Получение слишком длинного логического индекса ошибки (индекса)

Я пытаюсь запустить следующий код, но получил эту ошибку Ошибка в unclass(x)[i, , drop = FALSE]: (индекс) слишком длинный логический индекс

library ( survival ) 
library(KMsurv)
data("tongue")
tongue
Weibull.1<-survreg(Surv(times,censor)~1, data=tongue, subset=(group==1),scale=1,dist="weibull")
Weibull.2<-survreg(Surv(times,censor)~1, data=tongue, subset=(group==2),scale=1,dist="weibull")

Как я могу избежать этой ошибки?


person Dana    schedule 05.05.2020    source источник
comment
Error: object 'times' not found. (изменить время) ..... Error: object 'censor' not found. (изменить на дельту) .... Error: object 'group' not found. Вздох   -  person Edward    schedule 05.05.2020
comment
У меня другая ошибка. Warning message: In survreg.fit(X, Y, weights, offset, init = init, controlvals = control, : Ran out of iterations and did not converge   -  person Dana    schedule 05.05.2020


Ответы (1)


Я не очень понимаю, что ты делал. Все указанные вами переменные отсутствовали в наборе данных. Tongue имеет только 3 переменные, type, time и delta. Если вы исправите их, вы получите ответ.

survreg(Surv(time, delta) ~ 1,
        data = tongue,
        subset = ( type == 1),
        scale = 1,
        dist = "weibull")

Call:
survreg(formula = Surv(time, delta) ~ 1, data = tongue, subset = (type == 
    1), dist = "weibull", scale = 1)

Coefficients:
(Intercept) 
   4.911231 

Scale fixed at 1 

Loglik(model)= -183.2   Loglik(intercept only)= -183.2
n= 52 
person Sergio Romero    schedule 05.05.2020