powered by
"boxplot"(x, fac = NULL, nax = 1:5, ...)
data(bot) bot.f <- efourier(bot, 12) bot.p <- PCA(bot.f) boxplot(bot.p) p <- boxplot(bot.p, 1) #p + theme_minimal() + scale_fill_grey() #p + facet_wrap(~PC, scales = "free")
Run the code above in your browser using DataLab