head(data.gug)
head(data.gug)
head(data.gug)
is.numeric(data.gug$pos)
as.numeric(data.gug$pos)
summary(data.gug)
as.character(data.gug$pos)
as.numeric(as.character(data.gug$pos))
head(data.gug$pos,n=30)
summary(subset(gram,(condition=="a" & pos==9) | (condition=="b" & pos==8)))
dim(subset(gram,(condition=="a" & pos==9) | (condition=="b" & pos==8)))
dim(subset(gram,(condition=="a" & pos==9) | (condition=="b" & pos==8) & rt<1500))
dim(subset(gram,(condition=="a" & pos==9) | (condition=="b" & pos==8) & rt<2000))
head(alldataq)
summary(gram)
hist(gram$rt)
1002-1120
118/1120
1039-1120
81/1120
1070-1120
50/1120
hpd.modelv1
fm.v1
hpdmodelvq
hpd.modelvq
hpd.modelv1
fm.postv1
hpd.modelpostv1
q()
300000*3.8/100
q()
