Rcmdr stuff (17 Feb 09)

meat <- edit(as.data.frame(NULL))
meat$ind.mixed <- recode(meat$condition, '"V"=0; "M"=1; ', as.factor.result=TRUE)
showData(meat, placement='-20+200', font=getRcmdr('logFont'), maxwidth=80, maxheight=30)
LinearModel.1 <- lm(logcount  ~ ind.mixed , data=meat)
summary(LinearModel.1)


meat

attach(meat)  # attach data frame

condition
\
logcount


t.test(logcount[condition=="V"], logcount[condition=="M"])
t.test(logcount[condition=="V"], logcount[condition=="M"], var.equal=TRUE)
history()