I calculate an anova test in the following way:

expdata<-read.table("/home/dorien/UA/meta-music/optimuse/optimuse1-build-desktop/results/results_processedCP",
header=TRUE)

names(expdata)<-c('nh1','nh2','nh3','randsize','aweights','tt1','tt2','tt3','path','iters','type','length','tos','tws','time')

fit<-(aov(tos~nh1*nh2*nh3*randsize*aweights*tt1*tt2*tt3*iters*length,
data=expdata))

summary(fit)

I want to check the fit of the model with Rsquared, but I cannot seem to
find a way to do this...


Any help is much appreciated...

Thanks,

Dorien

	[[alternative HTML version deleted]]

