R: Неспособность увидеть исходный код пакета Psych - PullRequest
Новая
       14

R: Неспособность увидеть исходный код пакета Psych

0 голосов
/ 25 сентября 2019

Доступ к исходному коду некоторых пакетов можно получить, загрузив пакет, наведя курсор на имя пакета и нажав 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 }

Есть идеи, почему исходный код не отображается и как его найти?Спасибо

1 Ответ

2 голосов
/ 25 сентября 2019

Это работает только для функций, а не для целых пакетов.Это работает для 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>
...