【R语言 组间t检验】下图中的P值是如何加上去的，对应哪个函数呢？

原文中此图表示的是两组资料的组间差异性，用的是t检验。如何像原文中那样加上P值呢？附上原文的图和我的代码，谢谢大家了！

加上stat_compare_means，其实现办法这里写得比较详细：
https://www.jianshu.com/p/d8e002de9fc3