# NOT RUN {
set.seed(5)
num.of.variables <- 14
num.of.observations <- 34
rn <- rnorm(num.of.variables * num.of.observations)
data.mat <- matrix(rn, nrow = num.of.observations, ncol = num.of.variables)
PCA.Plotter(data.mat)
# }
Run the code above in your browser using DataLab