library(learnr)
library(testwhat)
knitr::opts_chunk$set(echo = FALSE, warning = FALSE, message = FALSE)
tutorial_options(exercise.checker = testwhat_learnr)
tmp.df <- PLSC309::state_party
write.csv(tmp.df, "state_party.csv", row.names=F)
#rm(list=ls())
df <- read.csv("state_party.csv")
names(df)
sum(df$democrat)
names(df)
sum(df$democrat)
# tmp.df <- PLSC309::state_party
# write.csv(tmp.df, "state_party.csv", row.names=F)
# rm(list=ls())

df <- read.csv("state_party.csv")



nsm5230/PLSC309nsm documentation built on Aug. 27, 2020, 5:01 a.m.