# NOT RUN {
# Data
data("b_pam", package = "biosurvey")
data("m_selection", package = "biosurvey")
# Subsetting base PAM according to selections
## only uniform in G
sub_pam_G <- subset_PAM(b_pam, m_selection, selection_type = "G")
## All at the time
sub_pam_all <- subset_PAM(b_pam, m_selection, selection_type = "all")
# }
Run the code above in your browser using DataLab