我希望自动化探索性数据分析过程,并希望绘制所有输入变量的分布图(使用线图,直方图,密度曲线等)。正如我的代码所示,我只是得到4个空白图形窗口。我做错了什么?如果有更好的方法,我也会对此持开放态度。
mydata <- read.csv("http://www.ats.ucla.edu/stat/data/binary.csv")
for (i in names(mydata)){
qplot(data=mydata,i,geom="bar", fill="admit")
dev.new()
}
答案 0 :(得分:0)
这种情况看起来像aes_string
会派上用场(以及print
对ggplot
的追加aes_string
。我发现this post显示了如何在循环中使用ggplot
和mydata$admit = factor(mydata$admit)
for(i in names(mydata)) {
print(ggplot(mydata) + geom_bar(aes_string(x = i, fill = "admit")))
}
。
所以它看起来像这样:
dev.new
我在RStudio工作,所以跳过了代码的admit
部分。我发现我还需要将{{1}}转换为一个因子。