# NOT RUN {
# query text note data
t <- get_text_notes_from_NASIS_db()
# show contents text note data, includes: siteobs, site, pedon, horizon level text notes data.
str(t)
# view text categories for site text notes
table(t$site_text$textcat)
# }
Run the code above in your browser using DataLab