1

TukeyHSD を R で実行しようとしています。コードは次のようになります。

#----------------------------------------------------------------------------------------#
# RING data:
#----------------------------------------------------------------------------------------#
library(doBy)
# Set working directory
setwd("")

#### Read data & Converting factors ####
dat <- read.table("afstand.txt", header =TRUE)  
str(dat)
dat$Vial <- as.factor(dat$Vial)
dat$Line <- as.factor(dat$Line)
dat$Fly <- as.factor(dat$Fly)  
dat$Temp <- as.factor(dat$Temp)
str(dat)

datSUM <- summaryBy(X0.5_sec+X1_sec+X1.5_sec+X2_sec+X2.5_sec+X3_sec~Vial_nr+Concentration+Sex+Line+Vial+Temp,data=dat, FUN=sum)
fl<-levels(datSUM$Line)
aov1 <- aov(X0.5_sec.sum ~ Concentration*Sex*Line*Temp, data=datSUM)
summary(aov1) #Overview of model 
TukeyHSD(aov1, 'Line',ordered = TRUE, conf.level = 0.95)

たとえば、Line と Temp の間の相互作用を調べたいのですが、TukeyHSD(aov1) を実行すると、すべての相互作用が取得され、次のエラーが発生します。 [ reached getOption("max.print") -- omitted 3716 rows ]テストのみを指定できる方法はありますかLine と Temp の間で、すべての組み合わせではない、または TukeyHSD(avo1) を実行した場合に重要な結果のみを表示する方法はありますか? を使ってみ ましたがTukeyHSD(aov1, 'Line,Temp',ordered = TRUE, conf.level = 0.95)、うまくTukeyHSD(aov1, 'Line':'Temp',ordered = TRUE, conf.level = 0.95)いきTukeyHSD(aov1, 'Line'&'Temp',ordered = TRUE, conf.level = 0.95)ませんでした。

structure(list(Concentration = structure(c(2L, 7L, 7L, 1L, 7L, 
1L, 2L, 1L, 7L, 1L, 4L, 2L, 2L, 1L, 2L, 4L, 7L, 2L, 2L, 1L), .Label = c("a", 
"b", "c", "d", "e", "x", "y"), class = "factor"), Sex = structure(c(1L, 
2L, 2L, 2L, 1L, 2L, 2L, 1L, 1L, 2L, 1L, 1L, 1L, 1L, 2L, 1L, 1L, 
1L, 2L, 1L), .Label = c("f", "m"), class = "factor"), Line = structure(c(3L, 
3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 2L, 3L, 3L, 3L, 3L, 2L, 3L, 
3L, 3L, 3L), .Label = c("20", "23", "40", "73"), class = "factor"), 
    Temp = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
    2L, 1L, 2L, 1L, 1L, 2L, 1L, 2L, 1L, 1L), .Label = c("23", 
    "29"), class = "factor"), X0.5_sec.sum = c(107.19, 46.17, 
    58.05, 75.87, 87.75, 71.55, 46.17, 47.25, 22.41, 31.05, 27.36, 
    79.11, 87.58, 21.33, 34.29, 60.4, 85.05, 72.47, 114.21, 67.77
    )), .Names = c("Concentration", "Sex", "Line", "Temp", "X0.5_sec.sum"
), row.names = c(NA, 20L), class = "data.frame")
4

1 に答える 1

1

変数Lineとの間の相互作用のみを表示するには、次のようTempに引数を指定できます。which

which = 'Line:Temp'

次に、完全な関数呼び出しを次のようにTukeyHSD変換します。

TukeyHSD(aov1, 'Line:Temp', ordered = TRUE, conf.level = 0.95)
于 2016-05-04T10:04:04.193 に答える