我基本上想减小所有点之间的距离,而在下面的气泡图中不改变点之间的相对位置。
set.seed(38)
df <- data.frame(x1= runif(n = 10, min = 1, max = 20),
x2= runif(n = 10, min = 1, max = 10),
x3= runif(n = 10, min = 1, max = 40))
ggplot(df, aes(x = x1, y = x2)) +
geom_point(aes(size = x3))
例如,我不能使用对数转换,因为那样会改变点之间的相对位置。我想不出其他任何方式,所以我希望能得到一些投入。
我稍后将扔掉所有轴和标签,只保留点,所以也许更改轴可能会成功?
希望问题描述有意义。