Skip to content

Instantly share code, notes, and snippets.

@njahn82

njahn82/ccDOAJ.md

Created June 23, 2014 13:28
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save njahn82/425189d3e3ac9b15b5cb to your computer and use it in GitHub Desktop.
Save njahn82/425189d3e3ac9b15b5cb to your computer and use it in GitHub Desktop.
Download ZIP
CC Licences Social Science Journals
Raw
ccDOAJ.md 
#load data
doaj <- read.csv("http://www.doaj.org/doaj?func=csv", header = TRUE, sep=",")

#subset social science journals
doaj.soz <- doaj[grep("Social Science",doaj$Subjects),]

#cross-tabulate licence conditions
table(doaj.soz$CC.License)
## 
##                by    by-nc by-nc-nd by-nc-sa BY-NC-SA    by-nd    by-sa 
##      784      153       84       98       25        0        8        3

# percentage
table(doaj.soz$CC.License) / nrow(doaj.soz) * 100
## 
##                by    by-nc by-nc-nd by-nc-sa BY-NC-SA    by-nd    by-sa 
##  67.8788  13.2468   7.2727   8.4848   2.1645   0.0000   0.6926   0.2597
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment