# NOT RUN {
if(requireNamespace("curl") &
curl::has_internet()) {
# fetch by ssa_key
res <- fetchLDM(8297, what = "ssa_key")
# physical properties correlated as taxonomic subgroup "Typic Argialbolls"
res <- fetchLDM(x = "Typic Argialbolls",
what = "corr_taxsubgrp",
tables = "lab_physical_properties")
# fetch by area_code (SSA only)
res <- fetchLDM("CA630", what = "area_code")
}
# }
Run the code above in your browser using DataLab