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

Question

当我绘制以下示例时:

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)

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

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

Answer 1

1)sunflowerplot您可能更喜欢使用向日葵图,它将重复点显示为单个点,每次出现都有一个辐条.不需要包裹.

sunflowerplot(AnswersDay1, Day1Group)

(继图之后)

2)抖动另一种常见的技术是使用略微移动重复点的抖动.在这个例子中,我们抖动Y变量但是可以交替地抖动X变量或两者.不需要包裹.

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

(继图之后)

3)cex如果你真的想使用大小作为重复数量的指标,那么创建一个新的数据框,其中包含每个点的重复数(在ag的Participant列中),然后如图所示绘制.同样,不需要包.

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