R语言如果实现诊断试验样本量计算呢？

想通过检测手段和金标准的灵敏度和特异度或者ROC曲线计算样本量，感觉pwr功效分析函数里面没有适合诊断试验样本量计算的，有专门的函数可以计算吗？