search for: dicretesidistr

Hola Jose, si CONCATENAR significa APILAR, es decir, concantenar verticalmente, por decirlo de algun modo, podrias hacerlo con rbind(): nuevovector <- rbind(vector1,vector2) Si ademas quieres que cada valor de los vectores originales sea identificado en el nuevovector, puedes usar: nuevovector <- stack(vector1,vector2) en este ultimo caso se agrega una columna adicional tipo factor, con

...2, 0, 8, 2, 5, 3, 2, 1, 1) #se explora la información library (epicalc) summ (incidencia) library(EpiEstim) ## se calcula el intervalo serial MeanFluSI <- 9.418994 #puse los datos de la incidencia SdFluSI <- 16.06 DicreteSIDistr <- vector() for(i in 0:35) { DicreteSIDistr[i+1] <- DiscrSI(i, MeanFluSI, SdFluSI) } plot(0:35, DicreteSIDistr, type="h", lwd=10, lend=1, xlab="tiempo (dias)", ylab="frequencia") title(main="distribution Discreta del intervalo serial ") # voy a pon...

Alguien me podría sugerir un paquete en R para generar pronóticos con modelos robusto de series de tiempo.   Saludos Enrique RAMOS [[alternative HTML version deleted]]