Windowsにインストールされているフォントを適当に指定してfamilyとして定義すると使えるようになるみたい。 windowsFonts(Times="Times New Roman") par(family="Times") 定義済みのフォントは windowsFonts() で表示される。 n <- 30 y <- 2 Bin <- functi…