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_32770823 <- RefManageR::ReadPubMed('32770823', database = 'PubMed')

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

PubMed_32770823 <- paste0(PubMedString, PMID_32770823$eprint)

doi_32770823 <- paste0(doiString, PMID_32770823$doi)

Sys.sleep(2)

- r PMID_32770823$title

r citation_32770823

r PubMed_32770823

r PMID_32770823$abstract

r doi_32770823

PMID_32476131 <- RefManageR::ReadPubMed('32476131', database = 'PubMed')

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

PubMed_32476131 <- paste0(PubMedString, PMID_32476131$eprint)

doi_32476131 <- paste0(doiString, PMID_32476131$doi)

Sys.sleep(2)

- r PMID_32476131$title

r citation_32476131

r PubMed_32476131

r PMID_32476131$abstract

r doi_32476131

PMID_32447492 <- RefManageR::ReadPubMed('32447492', database = 'PubMed')

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

PubMed_32447492 <- paste0(PubMedString, PMID_32447492$eprint)

doi_32447492 <- paste0(doiString, PMID_32447492$doi)

Sys.sleep(2)

- r PMID_32447492$title

r citation_32447492

r PubMed_32447492

r PMID_32447492$abstract

r doi_32447492

PMID_32272125 <- RefManageR::ReadPubMed('32272125', database = 'PubMed')

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

PubMed_32272125 <- paste0(PubMedString, PMID_32272125$eprint)

doi_32272125 <- paste0(doiString, PMID_32272125$doi)

Sys.sleep(2)

- r PMID_32272125$title

r citation_32272125

r PubMed_32272125

r PMID_32272125$abstract

r doi_32272125

PMID_32181510 <- RefManageR::ReadPubMed('32181510', database = 'PubMed')

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

PubMed_32181510 <- paste0(PubMedString, PMID_32181510$eprint)

doi_32181510 <- paste0(doiString, PMID_32181510$doi)

Sys.sleep(2)

- r PMID_32181510$title

r citation_32181510

r PubMed_32181510

r PMID_32181510$abstract

r doi_32181510

PMID_32169826 <- RefManageR::ReadPubMed('32169826', database = 'PubMed')

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

PubMed_32169826 <- paste0(PubMedString, PMID_32169826$eprint)

doi_32169826 <- paste0(doiString, PMID_32169826$doi)

Sys.sleep(2)

- r PMID_32169826$title

r citation_32169826

r PubMed_32169826

r PMID_32169826$abstract

r doi_32169826

PMID_32129902 <- RefManageR::ReadPubMed('32129902', database = 'PubMed')

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

PubMed_32129902 <- paste0(PubMedString, PMID_32129902$eprint)

doi_32129902 <- paste0(doiString, PMID_32129902$doi)

Sys.sleep(2)

- r PMID_32129902$title

r citation_32129902

r PubMed_32129902

r PMID_32129902$abstract

r doi_32129902

PMID_32100878 <- RefManageR::ReadPubMed('32100878', database = 'PubMed')

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

PubMed_32100878 <- paste0(PubMedString, PMID_32100878$eprint)

doi_32100878 <- paste0(doiString, PMID_32100878$doi)

Sys.sleep(2)

- r PMID_32100878$title

r citation_32100878

r PubMed_32100878

r PMID_32100878$abstract

r doi_32100878

PMID_31678302 <- RefManageR::ReadPubMed('31678302', database = 'PubMed')

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

PubMed_31678302 <- paste0(PubMedString, PMID_31678302$eprint)

doi_31678302 <- paste0(doiString, PMID_31678302$doi)

Sys.sleep(2)

- r PMID_31678302$title

r citation_31678302

r PubMed_31678302

r PMID_31678302$abstract

r doi_31678302

PMID_31676785 <- RefManageR::ReadPubMed('31676785', database = 'PubMed')

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

PubMed_31676785 <- paste0(PubMedString, PMID_31676785$eprint)

doi_31676785 <- paste0(doiString, PMID_31676785$doi)

Sys.sleep(2)