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

【问题标题】：How to use position_jitter_tern() in ggtern() in R?如何在 R 中的 ggtern() 中使用 position_jitter_tern()？
【发布时间】：2021-05-08 02:16:57
【问题描述】：

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

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

【问题讨论】：

标签： r ggtern

【解决方案1】：

您需要在geom_point 函数中使用“位置”选项。

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))

【讨论】：

【解决方案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()

【讨论】：