# NOT RUN {
#Load the minerals library
data(minerals)
# Load the soils data
data(soils)
#Load the regrouping structure
data(minerals_regroup)
# }
# NOT RUN {
afps_sandstone <- afps(lib = minerals,
smpl = soils$sandstone,
std = "QUA.2",
align = 0.2,
lod = 0.2,
amorphous = "ORG",
amorphous_lod = 1)
afps_sandstone_regrouped <- regroup(afps_sandstone,
minerals_regroup)
afps_sandstone_regrouped$phases_grouped
# }
Run the code above in your browser using DataLab