R中自定义函数的图例

Question

我有一个自定义函数，它运行ttest并绘制了t-distribution。我想我的传说说

"P-value = x" 

其中X是从测试的P-value。 X应该是动态的并且

"p-value = X" 

应该是图例中唯一的东西。我如何在base R中创建这个？我使用base R生成了发行版，所以我不想使用ggplot2，因为我需要重新编码所有内容。

Answer 1

如果x是一个包含p值的对象，则可以使用paste0("p-value = ", x)创建一个包含文本和p值的简单字符。那么这个问题就是把这个文本打印到你的图表上。有很多种方法，例如，

pval <- 0.05 
pstr <-paste0("My p-value is ", pval) 

plot(x=1:5, y=1:5) 
text(x=3, y=1, label = pstr) # creates text at the bottom 
legend(x="top", legend = pstr) # creates legend at the top 

在这里，你可以看到使用，它看起来如何取决于你是否与text或legend打印。