如何在R包“ extRemes”中检查“ return.level”的源代码？

Question

我现在正在使用软件包extRemes来构建GEV分发，并且我想检查该软件包如何计算收益水平。我尝试了以下代码：

library(extRemes)
return.level

return.level.fevd

如图所示，R未显示源代码。我不知道如何检查上述功能的源代码？感谢您的帮助。

感谢@EmilBode，我尝试了以下代码：

library(extRemes)
data(PORTw)
fit1 <- fevd(TMX1, PORTw, units="deg C", period.basis = "year")
get(paste0("return.level.fevd", tolower(fit1$method), pos=environment(return.level.fevd)))

但是，我仍然收到以下错误：