R ggscatter p值舍入？

Question

Dea（R）-Friends

我目前正在使用R来使用ggscatter绘制来自加速度计的数据。由于数据高度相关，因此绘制的p值四舍五入为1，从科学上讲，这有点...。当我研究可以传递给ggscatter的参数时，没有发现任何有用的信息，我正在寻求帮助。如何确定ggscatter如何以小数位数显示p值。

我的来源看起来像：

ggscatter(data, x = "Nexus1", y = "Nexus2",add = "reg.line", 
          conf.int = TRUE, cor.coef = TRUE, cor.method = "pearson", 
          xlab = "Nexus 1 [m/s^2]", ylab = "Nexus 2 [m/s^2]")

任何提示都非常感谢！ -克劳迪奥