article_dir <- system.file("examples/article",
package = "texor")
dir.create(your_article_folder <- file.path(tempdir(), "tempdir"))
x <- file.copy(from = article_dir, to = your_article_folder,recursive = TRUE,)
your_article_path <- paste(your_article_folder,"article",sep="/")
texor::patch_code_env(your_article_path)
texor::patch_table_env(your_article_path)
texor::patch_equations(your_article_path)
texor::patch_figure_env(your_article_path)
texor::pre_conversion_statistics(your_article_path,write_yaml = FALSE)
unlink(your_article_folder,recursive = TRUE)
Run the code above in your browser using DataLab