In sbalci/AutoJournalWatch: Auto Journal Watch.

knitr::opts_chunk$set(echo = FALSE)
knitr::opts_chunk$set(cache = TRUE)

suppressPackageStartupMessages(library("dplyr"))
suppressPackageStartupMessages(library("RefManageR"))

PubMedString <- "PubMed: https://www.ncbi.nlm.nih.gov/pubmed/?term="

doiString <- "doi: https://doi.org/"

PMID_32773194 <- RefManageR::ReadPubMed('32773194', database = 'PubMed')

citation_32773194 <- paste0(PMID_32773194$journal,' ', PMID_32773194$year, ' ', PMID_32773194$month,';', PMID_32773194$volume,'(', PMID_32773194$number,'):', PMID_32773194$pages)

PubMed_32773194 <- paste0(PubMedString, PMID_32773194$eprint)

doi_32773194 <- paste0(doiString, PMID_32773194$doi)

Sys.sleep(2)

- r PMID_32773194$title

r citation_32773194

r PubMed_32773194

r PMID_32773194$abstract

r doi_32773194

PMID_32171280 <- RefManageR::ReadPubMed('32171280', database = 'PubMed')

citation_32171280 <- paste0(PMID_32171280$journal,' ', PMID_32171280$year, ' ', PMID_32171280$month,';', PMID_32171280$volume,'(', PMID_32171280$number,'):', PMID_32171280$pages)

PubMed_32171280 <- paste0(PubMedString, PMID_32171280$eprint)

doi_32171280 <- paste0(doiString, PMID_32171280$doi)

Sys.sleep(2)

- r PMID_32171280$title

r citation_32171280

r PubMed_32171280

r PMID_32171280$abstract

r doi_32171280

PMID_31612756 <- RefManageR::ReadPubMed('31612756', database = 'PubMed')

citation_31612756 <- paste0(PMID_31612756$journal,' ', PMID_31612756$year, ' ', PMID_31612756$month,';', PMID_31612756$volume,'(', PMID_31612756$number,'):', PMID_31612756$pages)

PubMed_31612756 <- paste0(PubMedString, PMID_31612756$eprint)

doi_31612756 <- paste0(doiString, PMID_31612756$doi)

Sys.sleep(2)