Skip to content

Instantly share code, notes, and snippets.

@hpiwowar

hpiwowar/JournalPoliciesStatScript.R

Created July 21, 2010 13:45
Show Gist options
  • Save hpiwowar/484500 to your computer and use it in GitHub Desktop.
Save hpiwowar/484500 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
JournalPoliciesStatScript.R
library(Hmisc)
journdat = read.csv("~/Downloads/JournalData.csv", as.is=TRUE, na.strings="N/A")
journdat$is.Environmental.Sciences = 0
journdat$is.Environmental.Sciences[grep("*Environmental Sciences*", journdat$ISI.Category)] = 1
summary(Policy.request...require.code ~ Impact.Factor + Policy.has.instructions.for.how.to.cite.data. + Subscription.Model + is.Environmental.Sciences, journdat)
response = summary(Policy.request...require.code ~ Impact.Factor + Policy.has.instructions.for.how.to.cite.data. + Subscription.Model + is.Environmental.Sciences, journdat)
plot(response)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment