myscratchpad

実験デザイン用のパッケージ agricolae

# ラテン方格デザインでのランダマイズ
library(agricolae)
varieties<-c("perricholi","yungay","maria bonita","tomasa")
lsd <-design.lsd(varieties,number=1001,seed=23)
lsd # print field book. plotsは生物統計学の区画。心理学では参加者にあたる（と思う）
plots <-as.numeric(lsd[,1])
trt <-as.character(lsd[,4])
dim(plots)<-c(4,4)
dim(trt) <-c(4,4)
print(t(plots))
print(t(trt))

# 関数一覧
 http://rss.acs.unt.edu/Rdoc/library/agricolae/html/00Index.html
# 開発元
 http://tarwi.lamolina.edu.pe/~fmendiburu/
# CRAN Task View: Design of Experiments (DoE) & Analysis of Experimental Data
 # これは日本語化されると便利かもしれない
 http://cran.at.r-project.org/web/views/ExperimentalDesign.html