# NOT RUN {
## In real life, download crandb from CRAN or load it from your directory
## with functions crandb_down() or crandb_load().
## In this example, we use a small file.
crandb_load(system.file("data", "zcrandb.rda", package = "RWsearch"))
## Search in crandb
vec <- s_crandb(search, find, select = "PT")
lst <- s_crandb_list(thermodynamic, "chemical reaction")
# }
# NOT RUN {
## Generate a txt file
p_text(vec, filename = "SearchFind.txt", dir = file.path(tempdir(), "ptext"),
repos = "https://cloud.r-project.org")
## Generate a markdown file (and use rmarkdown::render() for further treatment)
## In sep1, replace the '=' sign by the sharp sign (rejected by R CMD check)
p_text(char = lst, filename = "Chemistry.md", beforetext = funheadermd(),
f_maintext = funmaintext, sep1 = "= ", sep2 = " ",
dir = file.path(tempdir(), "ptext"), repos = "https://cloud.r-project.org")
## Generate 4 tex + 4 pdf files (40-60 seconds)
p_text2pdf(lst, dir = file.path(tempdir(), "ptext"), cleantex = FALSE,
openpdf = FALSE, repos = "https://cloud.r-project.org")
# }
Run the code above in your browser using DataLab