tblid <- "TSIDEM01"
titles <- tibble::tribble(
~tblid, ~identifier, ~text,
"TSIDEM01", "TITLE", "Demographics Example",
"TSIDEM01", "FOOTNOTE1", "Example footnote."
)
title_foot <- rmdpstitle(titles, tblid)
title_foot[[1]]
title_foot[[2]]
Run the code above in your browser using DataLab