æ–‡å—列ã‹ã‚‰ãƒ¢ãƒ‡ãƒ«å¼ã‚’作る方法 - ã»ãã笑むãŸã¾ã«ã‚„ã‚‹ã‘ã©ã™ã忘れるã®ã§ãƒ¡ãƒ¢ã€‚ æ–‡å—列ã‹ã‚‰ãƒ¢ãƒ‡ãƒ«å¼ã‚’作る方法ã¯ã€ formula <- formula("HOGE ~ GROUP"); ã®ã‚ˆã†ã«ã‚„る。 例ãˆã°ã€ GROUP HOGE FUGA PIYO A 1 2 3 A 2 3 4 B 3 4 5 B 4 5 6 C 5 6 7 C 6 7 8 ã®ã‚ˆã†ãªãƒ‡ãƒ¼ã‚¿(data.txt)を列ã”ã¨ã« ANOVA ã™ã‚‹å ´åˆã€ data <- read.table("data.txt", header=TRUE); for(i in 2:4) { name <- colnames(data)[i]; formula <- formula(paste(name, "~ GROUP")); aov.result <- aov(formula, data); anova(aov.result); } ã®ã‚ˆã†ã«è¡Œã†ã“ã¨ãŒã§ãる。
{{#tags}}- {{label}}
{{/tags}}