アールメカブ

Rの備忘録

グラフィックスパラメータで

axis ＝ FALSE

が効かない場合は xaxt="n" を使う，の備忘録．

x <- rnorm(1000, 50, 10)
# pdf(file = "appendix2.pdf", family = "Japan1")
hist(x, main = "偏差値のシミュレーション", freq = FALSE, 
   col = "gray",  ylab = "", xlim = c(20, 80) , yaxt = "n")
my.dnorm <- function(x) dnorm(x, 50, 10)
curve(my.dnorm, from = 10, to = 80, add =T, lwd = 3, lty = 2)
legend(20, .04, legend= c("経験分布", "理論分布"), 
 col =  c("grey","black"), lwd = 5)
# dev.off()