Estimado Ernesto Lazaga
Mejoré algo su código con otra librería, le envío código, hay que
trabajarlo algo más, en este momento no puedo continuarlo, pero algo es
algo.
library(survival)
data(kidney)
modcox1 <- coxph(Surv(time, status)~age+sex+frail, data = kidney)
summary(modcox1)
library(reporttools) /////////////////////////////////// diferencias
m1 <- displayCoxPH(modcox1)
////////////////////////////////////////////////////////////////////////////
library("xtable")
xtable(modcox1)
library("texreg")
texreg(summary(modcox1))
library("apsrtable")
apsrtable(summary(modcox1))
Sexpr(summary(modcox1)$"Pr(>|z|)"[1],5)
Javier Rubén Marcuzzi
-------- Mensaje reenviado --------
Asunto: xtable
Fecha: Tue, 19 Aug 2014 11:46:10 -0400
De: Ernesto silvero lazaga <ernestsilver3103 en gmail.com>
A: javier.ruben.marcuzzi en gmail.com
Javier muchas gracias por tu aporte.
e provado con estos comandos y no. Bueno mi gran problema es que soy
nuevo en R y si no sale con los comando que pueda ya bum.
No se como preparar un codigo
data(kidney)
modcox1 <- coxph(Surv(time, status)~age+sex+frail, data = kidney)
summary(modcox1)
library("xtable")
xtable(summary(modcox1))
library("texreg")
texreg(summary(modcox1))
library("apsrtable")
apsrtable(summary(modcox1))
Sexpr(summary(modcox1)$"Pr(>|z|)"[1],5)
--
ernesto
[[alternative HTML version deleted]]