绘制相同值时显示更大的点

当我绘制以下示例时：

Participant <- c(1:12)
AnswersDay1 <- c(9,3,9,13,7,12,10,7,9,0,12,11)
Day1Group   <- c(0,1,0,1, 0, 1, 0,1,0,1, 0, 1)


PushFrame <- data.frame(Participant, AnswersDay1, Day1Group)
plot(AnswersDay1, Day1Group)

该图仅显示 10 个点，而不是 data.frame 中的 12 个值。我发现这是因为存在三对具有完全相同的值。

是否可以在情节中以某种方式说明这一点？也许当它们具有相同的值或类似的东西时使用更大的点？

1）向日葵地块您可能更喜欢使用向日葵图，它将重复的点显示为单个点，每次出现都有一个辐条。不需要包。

sunflowerplot(AnswersDay1, Day1Group)

（图后续）

2）抖动另一种常见的技术是使用抖动来稍微移动重复点。在此示例中，我们抖动 Y 变量，但也可以交替抖动 X 变量或两者都抖动。不需要包。

set.seed(123) # set seed of random number generator for reproducibility
plot(AnswersDay1, jitter(Day1Group))

（图后续）

3) cex如果您确实想使用大小作为重复次数的指标，则创建一个新的数据框，其中包含每个点的重复次数（在 ag 的“参与者”列中），然后如图所示进行绘制。同样，不需要包。

ag <- aggregate(Participant ~., PushFrame, length)
plot(Day1Group ~ AnswersDay1, ag, cex = Participant, pch = 20)