Autorengebühren aus DOAJ nach Ländern

Wer wissen möchte, in welchem Land welches Open-Access-Finanzierungsmodell vorherrscht – vorbehaltlich der Korrektheit und Aktualität der DOAJ-Daten) – kann einfach folgendes R-Skript nutzen:

library(plyr)
doaj <- read.csv("http://doaj.org/csv", sep=",") ddply(doaj, .(Country, Publication.fee), summarise, freq=length(Publication.fee))

Output für United Kingdom:
United Kingdom CON 15
United Kingdom N 205
United Kingdom NY 4
United Kingdom Y 392


Germany:
92 Germany CON 4
93 Germany N 234
94 Germany NY 4
95 Germany Y 98

"Publication charges":
N: No charges
Y: Has charges
NY: No info available
CON: : Conditional charges

Ein Beispiel für Conditional charges sind die Bedingungen des Journals Ethics & Global Politics.