我想要生成一个矩阵来计划一个实验。
例如:
Monday: A C D B E F
Tuesday: C E A B F D
...我试着设计出一个包装“农业”和包装“交叉”,但到目前为止没有成功。我的想法是采用平衡的、不完整的区块设计。下面是我的一个代码的示例。
> trt <- c("A", "B", "C", "D", "E", "F" )
> k <- 6
> outdesign<- design.bib (trt, k, seed=0)
Error in md[i, bi] : incorrect number of dimensions发布于 2014-03-11 14:17:31
你用错了函数。您需要完整的块设计(design.rcbd),而不是不完整的设计。不完整的块设计将创建块,其中只包括一些治疗。因此,对于design.bib,k< length(trt)。
编辑:这将给你6个科目6天。强迫每一天都以不同的方式对待每一个问题,这比我现在有时间做的要多,但也许在我讲到之前,别人会回答你的。
trt <- c("A", "B", "C", "D", "E", "F" )
N <- 6
days <- 6
outdesign<-as.data.frame(matrix(nrow=N*length(trt),ncol=days+1))
names(outdesign)<-c("Subj", "Day1", "Day2", "Day3", "Day4", "Day5", "Day6")
outdesign$Subj<-rep(1:6,each=length(trt))
for (i in 1:days) {
outdesign[,i+1]<- design.rcbd(trt, N, seed=0,first=TRUE)$book$trt
}
Subj Day1 Day2 Day3 Day4 Day5 Day6
1 1 E F D C C C
2 1 C E E F F E
3 1 D C B A E D
4 1 B D F D A A
5 1 A B C B D F
6 1 F A A E B B
7 2 D C F A F F
8 2 B E B C E B
9 2 C D E E D A
10 2 A F A F B E
11 2 F A D B C D
12 2 E B C D A C
13 3 B C C A B F
14 3 A A E F E E
15 3 C E F B A B
16 3 E B A C F A
17 3 F F B D C C
18 3 D D D E D D
19 4 F C F D F E
20 4 D B A E B D
21 4 B F D A A F
22 4 C A B B D B
23 4 E E E C C C
24 4 A D C F E A
25 5 D E F A A F
26 5 A D E E E B
27 5 C C C D D E
28 5 E F B C C C
29 5 B A A F B A
30 5 F B D B F D
31 6 F F A F C F
32 6 A D E E D B
33 6 C B C D A A
34 6 B C F C F C
35 6 E E B A E D
36 6 D A D B B Ehttps://stackoverflow.com/questions/22327069
复制相似问题