R: diferència entre les revisions

R (mostra el codi font)

469 bytes afegits , 2 juny 2005

10.883

modificacions

@@ Línia 1.274: / Línia 1.274: @@
   length(subset(individual,is.na(individual$dies))$dies)
-'''4-Agregamos para tener los datos por ambulatorio'''
+'''4-Algunos análisis sin demasiado sentido en la base ''individual'' a la espera que alguien añada más'''
+ sexe<-prop.table(table(individual$SEXE))
+ sexe
+ barplot(sexe,col="orange",ylim=c(0,1))
+ prop.table(table(individual$CONTR,individual$SEXE),2)
+ tapply(individual$EDAT,individual$SEXE,mean)
+ boxplot(individual$EDAT~individual$SEXE,col=c("orange","blue"))
+ summary(glm(individual$numero~individual$EDAT+individual$SEXE+individual$CONTR,family=poisson))
+'''5-Agregamos para tener los datos por ambulatorio'''
 == Sistema de ayuda ==