# NOT RUN {
# Load data (mslp)
data(mslp)
# Converting our data into a S-mode, but without modifying time period
smode_mslp <- tidy_cuttime_nc(mslp)
# PCA decision performance
info_pca <- pca_decision(smode_mslp$smode_data)
# }
Run the code above in your browser using DataLab