在R中的堆叠条形图（1-D散点图）中对点进行分组

Question

这很难用语言描述。首先是图片。

它是使用该代码

创建的

1

请查看左下角的值（1.0 x jar tv <filename.jar>）。有13分。我想把它们分组（例如）5分。这意味着我想要5分的列。结果应该是这样的。

Answer 1

使用数据生成功能，但由于随机选择不同，结果不同。

df <- data.frame(a=sample(1:2, 60, replace=TRUE), b=c(1:3))
stripchart(b~a, data=df, method="stack", offset=0.5, pch=20)
df2 = df                ## So that df is not changed

for(A in unique(df$a)) {
    for(B in unique(df$b)) {
        S = which(df$a==A & df$b==B)
        while(length(S) > 5) {
            S = S[-(1:5)]
            df2$b[S] = df2$b[S]+0.05
        }
    }
}
stripchart(b~a, data=df2, method="stack", offset=0.5, pch=20)