search for: mafdisc

...ESTING DATAFRAMES train <- traintest1[traintest1$DISC_USE1 == 1.01|traintest1$DISC_USE1 == 1.02,] test <- traintest1[traintest1$DISC_USE1 > 1.02,] # NOW, TRAIN HAS 400 ROWS, TEST HAS 396 ROWS, AND TRAINTEST1 HAS 796 ROWS, EACH HAS 615 COLUMNS, AS EXPECTED # RUN DISCRIM ON TRAINING DATA mafdisc <- lda(normal~mafelev + mafscatter, data = train) #mafdisc$counts IS 210 AND 190, AS EXPECTED #FINALLY, TEST IT ON THE TEST DATA mafdiscpred <- predict(mafdisc, data = test) #BUT mafdiscpred$class HAS LENGTH = 400, NOT 396, AS EXPECTED. any help appreciated thanks Peter Peter L. Flom,...