R小问题

步骤

> library(xlsx)

> test<-read.csv("I:/山农大学大数据中心/柱状图/z7.csv")

> data1=test[]    #选第三列

> table <-table(data1)    #对选出来的制作表格（出现的次数）

> table=sort(table,decreasing=TRUE)   #升序

> table_20=table[:]

> data2=as.data.frame(table_20)   #数据框的利用

> View(data)

> ggplot(data2, aes(x = data2$data1, y =data2$Freq,fill=data2$data1)) +  geom_bar(stat = "identity")+labs(y='value',x='city')

#导入数据框   +条形图+名字

这里重点说一下

data1=test[3] 对对应的是灰色

这个是选取第三行的表格数据

也可以是data1=test[,3] 对应的是彩色

不过这样data就变成了values，而不是data了，虽然这部分不太明白但是就是这个意思

过了半小时，我理解了，原来产生的效果不一样灰色的是data，而彩色的是values

这有一个就是自动生成的名字

ggplot(data2, aes(x = data2$data1, y =data2$Freq,fill=data2$data1)) +  geom_bar(stat = "identity")+labs(y='value',x='city')

巴特西

R小问题

最新文章

热门文章