Raw Message

Message-ID: <72872f6f-1a85-4fde-a2fe-9632fc9cdf00@x5g2000yqk.googlegroups.com>
Date: 2009-04-24T13:59:37Z
From: Doerte
Subject: Interpreting the results of Friedman test
In-Reply-To: <20090424134246.195060@gmx.net>

Hello again,

it seems, the R script has been filtered from the previous posting.
Thus, I include is as text here:

dataForANOVA <- read.csv("C:/R/dataForANOVA.dat",
                         sep="|",
                         as.is=T,
                         na.strings=".",
                         header=TRUE)
dataForFriedman <- read.csv("C:/R/dataForFriedmanTest.dat",
                            sep="|",
                            as.is=T,
                            na.strings=".",
                            header=FALSE)

anova1 <- lm(AUC~as.factor(Condition),data=dataForANOVA)
result_shapiro <- shapiro.test(anova1$residuals)
result_bartlett <- bartlett.test(anova1$residuals~as.factor
(Condition),data=dataForANOVA)
summaryANOVA1 <- summary(anova1)

anova1Results <- anova(lm(AUC~as.factor(Condition),data=dataForANOVA))
print(anova1Results)

friedman.test(as.matrix(dataForFriedman))