Displaying 3 results from an estimated 3 matches for "logse".
Did you mean:
logs
2024 May 15
2
Extracting values from Surv function in survival package
...[1:4] 18 13 5 1
..- attr(*, "names")= chr [1:4] "SUBDATA$ARM=1, SUBDATA[, EXP.STRAT]=0" "SUBDATA$ARM=2, SUBDATA[, EXP.STRAT]=1" "SUBDATA$ARM=2, SUBDATA[, EXP.STRAT]=2" "SUBDATA$ARM=2, SUBDATA[, EXP.STRAT]=3"
$ type : chr "right"
$ logse : logi TRUE
$ conf.int : num 0.95
$ conf.type: chr "log"
$ lower : num [1:37] 0.844 0.755 0.678 0.608 0.542 ...
$ upper : num [1:37] 1 1 1 0.996 0.962 ...
$ call : language survfit(formula = FORMULA1)
- attr(*, "class")= chr "survfit"
If I could acc...
2024 May 16
1
Extracting values from Surv function in survival package
...gt; ..- attr(*, "names")= chr [1:4] "SUBDATA$ARM=1, SUBDATA[, EXP.STRAT]=0" "SUBDATA$ARM=2, SUBDATA[, EXP.STRAT]=1" "SUBDATA$ARM=2, SUBDATA[, EXP.STRAT]=2" "SUBDATA$ARM=2, SUBDATA[, EXP.STRAT]=3"
> $ type : chr "right"
> $ logse : logi TRUE
> $ conf.int : num 0.95
> $ conf.type: chr "log"
> $ lower : num [1:37] 0.844 0.755 0.678 0.608 0.542 ...
> $ upper : num [1:37] 1 1 1 0.996 0.962 ...
> $ call : language survfit(formula = FORMULA1)
> - attr(*, "class")= chr...
2007 Nov 30
1
meta-analysis on diagnostic tests (bivariate approach)
...ch to incorporate between and within study variances
and using the restricted maximum likelihood estimation.
This is the script (or function) so far....
bivar<-function(TP,FP,FN,TN){
# find a way to sum 0.5 to each null cell if any
Se<-TP/(TP+FN)
Sp<-TN/(TN+FP)
logSe<-log(Se/(1-Se))
logSp<-log(Sp/(1-Sp))
vlogSe<-1/(Se*(1-Se)*(TP+FN))
vlogSp<-1/(Sp*(1-Sp)*(TN+FP))
bsvlogSp<-0
cblog<-0
bsvlogSp<-0
sdata<-rbind(bsvlogSp,cblog,bsvlogSp,vlogSe,vlogSp)
Does anyone know if there is any package or funct...