R中的实验设计:平衡不完全块设计

Question

我想生成一个矩阵来计划一个实验。

• 我有6个人，6天完成了6次治疗。
• 我可以每周使用1个个体(6周共6天= 36天测试，每天6次治疗)。
• 每天，我将在个人身上随机测试6种治疗方法。一个人不应该在一周的任何一天开始同样的治疗。

例如:

Monday: A C D B E F
Tuesday: C E A B F D
...

• 如果可能，不同的个体不应该有相同的顺序。
• 我想考虑订单处理;也就是说，每一对治疗应该尽可能平等地重复，以避免"结转"(顺序和顺序)效应。我目前正在使用R，但也可以使用MATLAB。

我试过用"agricolae"包装和"crossdes"包装设计，但到目前为止还没有成功。我的想法是使用平衡的不完整块设计。下面是我的一个代码示例:

> 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

Answer 1

您使用了错误的函数。您需要一个完整的块设计(design.rcbd)，而不是一个不完整的块设计。不完整的块设计将创建只包含某些处理的块。因此，对于设计。Bib, k &;长度(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    E