In sbalci/Pathology-Articles-from-Turkey: Pathology Articles from Turkey

knitr::opts_chunk$set(echo = TRUE,
                      eval = TRUE,
                      include = TRUE,
                      warning = FALSE,
                      message = FALSE,
                      cache = FALSE
                      )

articles <- readr::read_csv(file = "data/articles.txt", col_names = TRUE)

tidyr::replace_na(articles, list(c("")))

articles_PMIDs <- articles$PMID

out_articles = NULL
for (i in 1:length(articles_PMIDs)) {
  value.articles_PMID <- articles_PMIDs[i]
  out_articles = c(out_articles,
          knitr::knit_expand('_articles_child.Rmd')
  )
  }

r paste(knitr::knit(text = out_articles), collapse = '\n\n\n')

sbalci/Pathology-Articles-from-Turkey documentation built on Nov. 13, 2024, 4:35 a.m.