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')