我有一个 .csv 文件,其中包含如下数据:
RI Na Mg Al Si K Ca Ba Fe Type
1 1.51793 12.79 3.50 1.12 73.03 0.64 8.77 0.00 0.00 BWF
2 1.51643 12.16 3.52 1.35 72.89 0.57 8.53 0.00 0.00 VWF
3 1.51793 13.21 3.48 1.41 72.64 0.59 8.43 0.00 0.00 BWF
4 1.51299 14.40 1.74 1.54 74.55 0.00 7.59 0.00 0.00 TBL
5 1.53393 12.30 0.00 1.00 70.16 0.12 16.19 0.00 0.24 BWNF
6 1.51655 12.75 2.85 1.44 73.27 0.57 8.79 0.11 0.22 BWNF
我想为每列的分布创建直方图。
我试过这个:
data<-read.csv("glass.csv")
names<-(attributes(data)$names)
for(name in names)
{
dev.new()
hist(data$name)
}
但我不断收到此错误:Error in hist.default(data$name) : 'x' must be numeric
我假设这个错误是因为attributes(data)$names
返回一组字符串,"RI" "Na" "Mg" "Al" "Si" "K" "Ca" "Ba" "Fe" "Type"
但我无法将它们转换为必要的格式。
任何帮助表示赞赏!
你很接近。我想你也想得到Type
在最后。
data<-read.csv("glass.csv")
# names<-(attributes(data)$names)
names<-names(data)
classes<-sapply(data,class)
for(name in names[classes == 'numeric'])
{
dev.new()
hist(data[,name]) # subset with [] not $
}
您也可以直接循环遍历列:
for (column in data[class=='numeric']) {
dev.new()
hist(column)
}
But ggplot2
专为多个地块而设计。试试这样:
library(ggplot2)
library(reshape2)
ggplot(melt(data),aes(x=value)) + geom_histogram() + facet_wrap(~variable)
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)