Displaying 1 result from an estimated 1 matches for "actadata".
2003 Aug 06
3
problems with lda , data included, can somebody test with the new version
...2442 "6"
"21" 154.763888 -21116.0578 -0.120623 "6"
"22" 127.359594 -17490.575516 -0.120079 "6"
"23" 136.568559 -18329.619348 -0.121503 "6"
"24" 127.983753 -16243.10434 -0.121176 "6"
-----
script:
library(MASS)
actaData<-read.table("actaData.dat")
actaData
ass<-actaData$assignment
print(ass)
tass<-table(ass)
print(tass)
#print(attributes(tass))
priodim<-attr(tass,"dim")
prio=c(rep(1,priodim))/priodim
print(prio)
actaData
z<-lda(assignment ~ .,actaData,prior=prio,tol=1.0e-08)
--...