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

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

PubMed_32739935 <- paste0(PubMedString, PMID_32739935$eprint)

doi_32739935 <- paste0(doiString, PMID_32739935$doi)

Sys.sleep(2)

- r PMID_32739935$title

r citation_32739935

r PubMed_32739935

r PMID_32739935$abstract

r doi_32739935

PMID_32723208 <- RefManageR::ReadPubMed('32723208', database = 'PubMed')

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

PubMed_32723208 <- paste0(PubMedString, PMID_32723208$eprint)

doi_32723208 <- paste0(doiString, PMID_32723208$doi)

Sys.sleep(2)

- r PMID_32723208$title

r citation_32723208

r PubMed_32723208

r PMID_32723208$abstract

r doi_32723208

PMID_32719544 <- RefManageR::ReadPubMed('32719544', database = 'PubMed')

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

PubMed_32719544 <- paste0(PubMedString, PMID_32719544$eprint)

doi_32719544 <- paste0(doiString, PMID_32719544$doi)

Sys.sleep(2)

- r PMID_32719544$title

r citation_32719544

r PubMed_32719544

r PMID_32719544$abstract

r doi_32719544

PMID_32696306 <- RefManageR::ReadPubMed('32696306', database = 'PubMed')

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

PubMed_32696306 <- paste0(PubMedString, PMID_32696306$eprint)

doi_32696306 <- paste0(doiString, PMID_32696306$doi)

Sys.sleep(2)

- r PMID_32696306$title

r citation_32696306

r PubMed_32696306

r PMID_32696306$abstract

r doi_32696306

PMID_32691142 <- RefManageR::ReadPubMed('32691142', database = 'PubMed')

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

PubMed_32691142 <- paste0(PubMedString, PMID_32691142$eprint)

doi_32691142 <- paste0(doiString, PMID_32691142$doi)

Sys.sleep(2)

- r PMID_32691142$title

r citation_32691142

r PubMed_32691142

r PMID_32691142$abstract

r doi_32691142

PMID_32534711 <- RefManageR::ReadPubMed('32534711', database = 'PubMed')

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

PubMed_32534711 <- paste0(PubMedString, PMID_32534711$eprint)

doi_32534711 <- paste0(doiString, PMID_32534711$doi)

Sys.sleep(2)

- r PMID_32534711$title

r citation_32534711

r PubMed_32534711

r PMID_32534711$abstract

r doi_32534711

PMID_32534704 <- RefManageR::ReadPubMed('32534704', database = 'PubMed')

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

PubMed_32534704 <- paste0(PubMedString, PMID_32534704$eprint)

doi_32534704 <- paste0(doiString, PMID_32534704$doi)

Sys.sleep(2)

- r PMID_32534704$title

r citation_32534704

r PubMed_32534704

r PMID_32534704$abstract

r doi_32534704

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

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

PubMed_32111400 <- paste0(PubMedString, PMID_32111400$eprint)

doi_32111400 <- paste0(doiString, PMID_32111400$doi)

Sys.sleep(2)

- r PMID_32111400$title

r citation_32111400

r PubMed_32111400

r PMID_32111400$abstract

r doi_32111400

PMID_31907021 <- RefManageR::ReadPubMed('31907021', database = 'PubMed')

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

PubMed_31907021 <- paste0(PubMedString, PMID_31907021$eprint)

doi_31907021 <- paste0(doiString, PMID_31907021$doi)

Sys.sleep(2)

- r PMID_31907021$title

r citation_31907021

r PubMed_31907021

r PMID_31907021$abstract

r doi_31907021

PMID_31755778 <- RefManageR::ReadPubMed('31755778', database = 'PubMed')

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

PubMed_31755778 <- paste0(PubMedString, PMID_31755778$eprint)

doi_31755778 <- paste0(doiString, PMID_31755778$doi)

Sys.sleep(2)

- r PMID_31755778$title

r citation_31755778

r PubMed_31755778

r PMID_31755778$abstract

r doi_31755778

PMID_31725469 <- RefManageR::ReadPubMed('31725469', database = 'PubMed')

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

PubMed_31725469 <- paste0(PubMedString, PMID_31725469$eprint)

doi_31725469 <- paste0(doiString, PMID_31725469$doi)

Sys.sleep(2)

- r PMID_31725469$title

r citation_31725469

r PubMed_31725469

r PMID_31725469$abstract

r doi_31725469

PMID_31600399 <- RefManageR::ReadPubMed('31600399', database = 'PubMed')

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

PubMed_31600399 <- paste0(PubMedString, PMID_31600399$eprint)

doi_31600399 <- paste0(doiString, PMID_31600399$doi)

Sys.sleep(2)

- r PMID_31600399$title

r citation_31600399

r PubMed_31600399

r PMID_31600399$abstract

r doi_31600399

PMID_30882917 <- RefManageR::ReadPubMed('30882917', database = 'PubMed')

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

PubMed_30882917 <- paste0(PubMedString, PMID_30882917$eprint)

doi_30882917 <- paste0(doiString, PMID_30882917$doi)

Sys.sleep(2)