r - R：与 logitfmx 的拟合优度

Question

mfx我使用R 中的包估计了一些具有边际效应的二元逻辑模型logitmfx()。现在我需要拟合优度，例如 Nagelkerke R^2。使用包NagelkerkeR2()的fmsb返回错误：

“-rr$null 中的错误：一元运算符的参数无效”

如何获得模型的拟合优度？

谢谢！