如何在R中的ggtern()中使用position_jitter_tern()？

Question

我正在创建一个简单的三元图。

ggtern(data=data.frame(x=c(0.1,0.1),y=c(0.2,0.2),z=c(0.7,0.7)),aes(x,y,z)) + geom_point()

如何抖动该点，以便绘图将显示两个点？我试着这样使用position_jitter_tern :但它不会改变任何东西。

ggtern(data=data.frame(x=c(0.1,0.1),y=c(0.2,0.2),z=c(0.7,0.7)),aes(x,y,z, position_jitter_tern(0.1,0.1,0.1))) + geom_point()

Image can be seen here

Answer 1

您需要在geom_point函数中使用"position“选项。

library(ggtern)

df <- data.frame(x=c(0.1,0.1),y=c(0.2,0.2),z=c(0.7,0.7))

ggtern(data=df, aes(x,y,z) ) + 
       geom_point(position= position_jitter_tern(x=0.1, y=0.1, z=0.02))

​

​

Answer 2

您可以将基本jitter函数应用于数据帧。

library(ggtern)
library(ggplot2)

data=data.frame(x=c(0.1,0.1),y=c(0.2,0.2),z=c(0.7,0.7))
data[] <- lapply(data, jitter, 3)
ggtern(data,aes(x,y,z)) + geom_point()

​

​