Question

我仍然是R的新手，并希望在绘制条形图时寻求帮助。

stripchart(Study_intensive$AGE, method="stack",
at=c(0.05), pch=20, cex=2, xaxt="n", frame.plot=F, main= "Age Range in weight group(yr)")
axis(1, at=seq(0, 75, by=5) , labels= seq(0, 75, by=5),  
cex.axis=0.75)

这是我目前的代码，我正在尝试将其分组为另一个名为＆＃34; weightclass＆＃34 ;;基本上为每个重量级使用另一种颜色。＆＃34; weightclass＆＃34;有4个值：分别为1,2,3,4。有什么我可以轻易做到的吗？

谢谢你的帮助！

Answer 1

以下是使用mtcars的示例：

library(RColorBrewer)
testColor=brewer.pal(6, 'RdBu')
stripchart(mtcars$mpg~mtcars$gear, col=testColor, method="stack", pch=20, cex=2, xaxt="n", frame.plot=F, main= "Age Range in weight group(yr)")
axis(1, at=seq(0, 75, by=5) , labels= seq(0, 75, by=5), cex.axis=0.75)

<强> EDIT-1

使用ggplot，有一种方法可以让您在一个条带中获取所有内容并按组着色：

library(ggplot2)
library(RColorBrewer)
testColor=brewer.pal(6, 'RdBu')
mtcars$color=testColor[mtcars$gear] #to get the colors your after
mtcars$strip=1 #to get them into a single strip
ggplot(mtcars, aes(x=strip, y=mpg, color=color)) +
  geom_jitter(position=position_jitter(0.2)) + xlim(0, 2)

R中的组的条形图

1 个答案: