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进行打印。