为什么r语言的barplot函数设置颜色出错？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

全部的条都是一个颜色，新手小白交学校论文要用到，请各位大神不吝赐教！！
我的全部代码：
原来的问卷星导出的数据是这样的，所以先做了处理


g1<-platf[grepl( pattern = "微信", platf)]
g2<-platf[grepl( pattern = "QQ", platf)]
g3<-platf[grepl( pattern = "微博", platf)]
g4<-platf[grepl( pattern = "b站", platf)]                                                                                                                                                                                                                                                                       
g5<-platf[grepl( pattern = "小红书", platf)]
g6<-platf[grepl( pattern = "抖音", platf)]
g7<-platf[grepl( pattern = "快手", platf)]
record<- matrix(c(length(g1),length(g2),length(g3),length(g4),length(g5),length(g6),length(g7)), nrow = 1)
colnames(record) <- c("微信", "QQ", "微博",'b站','小红书','抖音','快手')
record
par(mar=c(3,3,3,3))
palette("default")
a<-cm.colors(7);a
barplot(record,xlim=c(0,80),horiz=T,space=0.3,cex.names=0.9,col=cm.colors(7))
但是这里显示的颜色很奇怪都是一个色

又尝试了换成col=c(1,2,3,4,5,6,7)，结果全是黑色。。。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：barplot plot bar ARP R语言

record不要用矩阵形式，用numeric就行了

1. record <- c(length(g1), length(g2), length(g3), length(g4), length(g5), length(g6), length(g7))
   
2. names(record) <- c("微信", "QQ", "微博",'b站','小红书','抖音','快手')

复制代码