Skip to content

Instantly share code, notes, and snippets.

@cheuerde

cheuerde/journalprint.r

Forked from alexsingleton/journalprint.r
Created January 31, 2017 20:11
Show Gist options
  • Save cheuerde/5260dc7029fe8806504d2ea82e460ef2 to your computer and use it in GitHub Desktop.
Save cheuerde/5260dc7029fe8806504d2ea82e460ef2 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
journalprint.r
file_journals <- ReadBib("journals.bib")
dates <- unlist(unique(file_journals$year))[order(unlist(unique(file_journals$year)),decreasing = TRUE)]
#Prints recerences
for (date in dates) {
cat(paste0("##",date),"\n")
print(file_journals[list(year=date)],.opts = list(style="markdown",bib.style ="authoryear" ,max.names =10,dashed=FALSE))
cat("\n")
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment