一个 实验设计的 求助

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1. y=c(100,200,300,400,500)
   
2. treatment=c(1,2,3,3,4)
   
3. block=c(1,1,2,3,3)
   
4. summary(lm(y~as.factor(treatment)+as.factor(block)))

复制代码

要求设计一个 可以

比较 treatment 1 and treatment 2
和
treatment 3 and treatment 4

的model

我试了所有的 Baseline
好像都不行

1. relevel(as.factor(block),ref="1");relevel(as.factor(treatment),ref="1")
   
2. relevel(as.factor(block),ref="1");relevel(as.factor(treatment),ref="2")
   
3. relevel(as.factor(block),ref="1");relevel(as.factor(treatment),ref="3")
   
4. relevel(as.factor(block),ref="1");relevel(as.factor(treatment),ref="4")
   
5. 
   
6. relevel(as.factor(block),ref="2");relevel(as.factor(treatment),ref="1")
   
7. relevel(as.factor(block),ref="2");relevel(as.factor(treatment),ref="2")
   
8. relevel(as.factor(block),ref="2");relevel(as.factor(treatment),ref="3")
   
9. relevel(as.factor(block),ref="2");relevel(as.factor(treatment),ref="4")
   
10. 
    
11. relevel(as.factor(block),ref="3");relevel(as.factor(treatment),ref="1")
    
12. relevel(as.factor(block),ref="3");relevel(as.factor(treatment),ref="2")
    
13. relevel(as.factor(block),ref="3");relevel(as.factor(treatment),ref="3")
    
14. relevel(as.factor(block),ref="3");relevel(as.factor(treatment),ref="4")

复制代码

谁有好办法?

谢谢！！！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：实验设计 treatment Baseline relevel Summary 求助 实验设计

难道和 baseline 没关系?

1. options(contrasts=c("contr.sum","contr.poly"))

复制代码

也试过了。。。

有高手会么。。。