Увеличение расстояния между точками на графике R

Question

В приведенном ниже коде показан график, в котором размер точки пропорционален количеству случаев, которые имеют одинаковые значения x и y. Как я могу увеличить пространство между точками, чтобы они не пересекали или не пересекали друг друга? В приведенном ниже примере используются поддельные данные, реальные данные охватывают около 200 точек, которые сильно пересекаются, что затрудняет восприятие каждой отдельной точки.

Спасибо,

София

x = seq(1:10) 
    y = c(4,3.8,3.8,3.2,3.1,2.5,2,1.5,1.2,1.3) 
    size = c(7,20,2,70,100,70,5,80,110,2) 
    pdf("example.pdf") 
    par(mar=c(5,5,1.8,1.8)) 
    plot(y ~ x, cex = sqrt(size), pch = 1, 
     ylab="y", 
     xlab = "x",ylim=c(0,4), 
     cex.lab =1.8,cex.axis =1.3, 
     lwd = .5,type= "p", col="grey60") 
    dev.off() 

Answer 1

Я хотел бы использовать ggplot2 для этого:

df = data.frame(x = seq(1:10), 
       y = c(4,3.8,3.8,3.2,3.1,2.5,2,1.5,1.2,1.3), 
       size = c(7,20,2,70,100,70,5,80,110,2)) 

library(ggplot2) 
ggplot(df, aes(x = x, y = y, size = size)) + geom_point() 

ggplot2 масштабирует область карты в соответствии со значениями в size, он напрямую не использует size как cex. Поэтому проблемы перекрытия нет, и нет необходимости вручную настраивать cex.