如何在R中的boxplot中添加相关值和p值

Question

我想在我的箱线图中添加计算的相关系数和p值。这是我的代码：

# Load needed package
library(coin)

# Simulate data
xx <- runif(10)
yy <- runif(10)

# Compute R and p-value
scor <- cor(xx, yy, method = "spearman")
ppp <- spearman_test(xx ~ yy)

# Make plot
boxplot(list(t(xx),t(yy)), main="exprment values", col = c("orange", "yellow"))
legend("topright", bty="n", legend=paste("r=0.69, p=0.0001"))

我希望自动打印R和p值，这样我就不必输出它们了。

Answer 1

您可以尝试将字符和数值粘贴在一起，只需要采用正确的格式。

legend("topright", bty="n", legend=paste("r=", scor, ", p=", ppp, sep = ""))