R: 看不到 Psych 包的源代码

Question

一些包的源代码可以通过加载包，将光标放在包名上并按F2来访问。例如：

 library(ltm)

产生以下结果（下面仅显示前 5 行源代码）：

 function (formula, constraint = NULL, IRT.param, start.val = NULL,
 na.action = NULL, control = list())
 {     
 cl <- match.call() 
 tm <- terms(formula)

我正在尝试查看名为 psych 的包的源代码

 library(psych)

但是我看到的只有下面的

1 function () 
2 {
3 }

知道为什么没有显示源代码以及如何找到它吗？谢谢

Answer 1

这只适用于函数而不适用于整个包。它恰好适用于 ltm，因为该软件包还具有一个名为 ltm 的函数。选择要查看源代码的具体函数。

diagram

function (fit, ...) 
{
    fn <- NULL
    if (length(class(fit)) == 1) {
        if (class(fit) == "lavaan") 
            fn <- "lavaan"
    }
    if (length(class(fit)) > 1) {
        fn <- class(fit)[2]
    }
    switch(fn, fa = {
        fa.diagram(fit, ...)
    }, principal = {
        fa.diagram(fit, ...)
    }, iclust = {
        iclust.diagram(fit, ...)
    }, omega = {
        omega.diagram(fit, ...)
    }, lavaan = {
        lavaan.diagram(fit, ...)
    }, bassAck = {
        bassAckward.diagram(fit, ...)
    }, extend = {
        extension.diagram(fit, ...)
    })
}
<bytecode: 0x00000000286e21e8>
<environment: namespace:psych>

R: 看不到 Psych 包的源代码

R: Failure to see source code of Psych package

r

package

rstudio