2019-11-01から1ヶ月間の記事一覧

最近officerパッケージでハマったこと3つ

Rひとりアドベントカレンダー26日目です。 Rのofficerパッケージは便利です。 パワーポイントでレポートが簡単に作れる。 こんな感じで会社用のテンプレートを読み込んで出力なんてことも簡単にできる。 library(officer) read_pptx("会社のテンプレート.ppt…

RでUMINの臨床試験データを取得する

Rひとりアドベントカレンダー22日目です。終盤に差し掛かってまいりました。 さて、国内の臨床試験はUMIN-CTRに登録するようになっている(特定臨床研究はjRCTだったりするが)。 そしてUMIN-CTRはスナップショットとして登録情報をCSVで公開している。 http…

老化によるset.seed忘れを防ぎたい

Rひとりアドベントカレンダー1日目。 set.seed()は乱数の種を設定する関数ということはよく知られている。 乱数の種を設定することで、乱数に再現性がとれるようになる。 例えば以下の2行のコードはまとめて実行することで毎回同じ結果を返す。 > set.seed(…

不正な入力がないだろうと思われるデータなのに不正な入力がありましたと言われた時は文字コードを疑う

R

read.csv()で不正な入力がありましたと言われる。 警告だけだからまあ無視するかと思いきやデータを読み込めていない。 > data <- read.csv('data/hoge.csv', as.is = TRUE, fileEncoding = "CP932") 警告メッセージ: 1: read.table(file = file, header = h…