doing it in R as it has fastica and can script weka