J'ai un petit soucis :
Je voudrais récupérer le summary transformé en tableau et l'envoyer dans un fichier !
Voici ma fonction :
Code : Tout sélectionner
grapheSurvie <- function(fichier,type_image,vectDuree, vectEvent){
survie_kaplan<-survfit(Surv(vectDuree, vectEvent))
#tabRes = summary(survie_kaplan)
#data.frame(tabRes)
#write.table(tabRes, "/home/rom/")
bitmap(fichier, type_image,10,10,72,12)
plot(survie_kaplan, xlab="Temps", ylab="Taux de survie", main="Courbe de survie de Kaplan-Meier",col="blue", lty=1)
dev.off()
graphics.off()
}
Mes lignes sont commentées volontairement car j'ai le message d'erreur suivant qui s'affiche :
Erreur dans as.data.frame.default(x[[i]], optional = TRUE, stringsAsFactors = stringsAsFactors) : impossible de convertir automatiquement "summary.survfit" en un tableau de données (data.frame)
J'obtiens bien l'image mais impossible d'avoir le summary() !
Est-ce néammoins possible de le récupérer de cette manière ou par le biais d'une autre méthode ?
Merci pour votre aide car je bloque !
@+