<div dir="ltr"><font face="verdana, sans-serif">Hola Manuel,</font><div><font face="verdana, sans-serif"><br></font></div><div style><font face="verdana, sans-serif">Antes de proyectar nada, he mirado simplemente como es tu conjunto para cada nivel de "tpo" (mira la imagen adjunta) y como ves el comportamiento de cada grupo (tpo) es irregular, es muy difícil ver un patrón.</font></div>
<div style><font face="verdana, sans-serif"><br></font></div><div style><font face="verdana, sans-serif">Entre las dudas a las que entiendo que se refiere Javier está una y es que ¿quieres proyectar "sep" teniendo en cuenta el valor de "tpo"? Si es así entonces realmente estás queriendo proyectar cuatro series diferentes (una por cada "tpo") y si es así, estas series son muy, muy irregulares. Si quieres hacer esto es más complejo y los resultados por la poca cantidad de datos en algunas series (la 3 y la 7 por ejemplo) ofrecerán unos resultados de proyección con gran error.</font></div>
<div style><font face="verdana, sans-serif"><br></font></div><div style><font face="verdana, sans-serif"><img src="cid:ii_13c4844d42cf384c" alt="Imágenes integradas 1" width="964" height="681"><br></font></div><div style>
<font face="verdana, sans-serif"><br></font></div><div style><font face="verdana, sans-serif">¿O lo que quieres es proyectar "sep" cómo si fuese una única serie sin tener en cuenta el valor de "tpo"?. En este caso parece que pueda ser más fácil... (es la imagen en la que hay un sólo gráfico, también adjunta).</font></div>
<div><font face="verdana, sans-serif"><br></font></div><div><font face="verdana, sans-serif"><br></font></div><div><font face="verdana, sans-serif"><img src="cid:ii_13c4845523fe7d94" alt="Imágenes integradas 2"><br></font></div>
<div><font face="verdana, sans-serif"><br></font></div><div style><font face="verdana, sans-serif">El código para generar lo anterior es este:</font></div><div style><font face="verdana, sans-serif"><br></font></div><div style>
<font face="verdana, sans-serif"><br></font></div><div style><font face="verdana, sans-serif">#########################</font></div><div style><font face="verdana, sans-serif"><br></font></div><div style><font face="verdana, sans-serif"><div>
<br></div><div>Lines <- "id sep  tpo</div><div>1  2<span class="" style="white-space:pre">      </span>1</div><div>2<span class="" style="white-space:pre"> </span>5<span class="" style="white-space:pre"> </span>1</div>
<div>3<span class="" style="white-space:pre">   </span>1<span class="" style="white-space:pre"> </span>3</div><div>4<span class="" style="white-space:pre"> </span>8<span class="" style="white-space:pre"> </span>2</div><div>
5<span class="" style="white-space:pre">      </span>11<span class="" style="white-space:pre">        </span>2</div><div>6<span class="" style="white-space:pre"> </span>13<span class="" style="white-space:pre">        </span>1</div><div>7<span class="" style="white-space:pre"> </span>10<span class="" style="white-space:pre">        </span>1</div>
<div>8<span class="" style="white-space:pre">   </span>2<span class="" style="white-space:pre"> </span>3</div><div>9<span class="" style="white-space:pre"> </span>4<span class="" style="white-space:pre"> </span>7</div><div>
10<span class="" style="white-space:pre">     </span>1<span class="" style="white-space:pre"> </span>1</div><div>11<span class="" style="white-space:pre">        </span>3<span class="" style="white-space:pre"> </span>1</div><div>12<span class="" style="white-space:pre">        </span>3<span class="" style="white-space:pre"> </span>1</div>
<div>13<span class="" style="white-space:pre">  </span>20<span class="" style="white-space:pre">        </span>2</div><div>14<span class="" style="white-space:pre">        </span>1<span class="" style="white-space:pre"> </span>1</div><div>
15<span class="" style="white-space:pre">     </span>1<span class="" style="white-space:pre"> </span>1</div><div>16<span class="" style="white-space:pre">        </span>4<span class="" style="white-space:pre"> </span>2</div><div>17<span class="" style="white-space:pre">        </span>8<span class="" style="white-space:pre"> </span>1</div>
<div>18<span class="" style="white-space:pre">  </span>1<span class="" style="white-space:pre"> </span>1</div><div>19<span class="" style="white-space:pre">        </span>5<span class="" style="white-space:pre"> </span>3</div><div>
20<span class="" style="white-space:pre">     </span>3<span class="" style="white-space:pre"> </span>2</div><div>21<span class="" style="white-space:pre">        </span>11<span class="" style="white-space:pre">        </span>1</div><div>22<span class="" style="white-space:pre">        </span>7<span class="" style="white-space:pre"> </span>2</div>
<div>23<span class="" style="white-space:pre">  </span>5<span class="" style="white-space:pre"> </span>7</div><div>24<span class="" style="white-space:pre">        </span>17<span class="" style="white-space:pre">        </span>1</div><div>
25<span class="" style="white-space:pre">     </span>5<span class="" style="white-space:pre"> </span>1</div><div>26<span class="" style="white-space:pre">        </span>3<span class="" style="white-space:pre"> </span>3</div><div>27<span class="" style="white-space:pre">        </span>2<span class="" style="white-space:pre"> </span>1</div>
<div>28<span class="" style="white-space:pre">  </span>16<span class="" style="white-space:pre">        </span>3</div><div>29<span class="" style="white-space:pre">        </span>4<span class="" style="white-space:pre"> </span>2</div><div>
30<span class="" style="white-space:pre">     </span>13<span class="" style="white-space:pre">        </span>1</div><div>31<span class="" style="white-space:pre">        </span>1<span class="" style="white-space:pre"> </span>1</div><div>32<span class="" style="white-space:pre">        </span>4<span class="" style="white-space:pre"> </span>1</div>
<div>33<span class="" style="white-space:pre">  </span>4<span class="" style="white-space:pre"> </span>1</div><div>34<span class="" style="white-space:pre">        </span>4<span class="" style="white-space:pre"> </span>1</div><div>
35<span class="" style="white-space:pre">     </span>15<span class="" style="white-space:pre">        </span>7</div><div>36<span class="" style="white-space:pre">        </span>20<span class="" style="white-space:pre">        </span>1</div><div>37<span class="" style="white-space:pre">        </span>11<span class="" style="white-space:pre">        </span>2</div>
<div>38<span class="" style="white-space:pre">  </span>8<span class="" style="white-space:pre"> </span>2</div><div>39<span class="" style="white-space:pre">        </span>4<span class="" style="white-space:pre"> </span>1</div><div>
40<span class="" style="white-space:pre">     </span>2<span class="" style="white-space:pre"> </span>2</div><div>41<span class="" style="white-space:pre">        </span>3<span class="" style="white-space:pre"> </span>1</div><div>42<span class="" style="white-space:pre">        </span>5<span class="" style="white-space:pre"> </span>1</div>
<div>43<span class="" style="white-space:pre">  </span>1<span class="" style="white-space:pre"> </span>1</div><div>44<span class="" style="white-space:pre">        </span>1<span class="" style="white-space:pre"> </span>2</div><div>
45<span class="" style="white-space:pre">     </span>1<span class="" style="white-space:pre"> </span>1</div><div>"</div><div><br></div><div><br></div><div>t.con<-textConnection(Lines)</div><div><a href="http://dat.in">dat.in</a><-read.table(t.con, header=T, <a href="http://as.is">as.is</a>=T)</div>
<div>close(t.con)</div><div><br></div><div>library(lattice)</div><div><br></div><div>barchart(</div><div>         sep ~ id | as.factor(tpo)</div><div>        ,horizontal=F</div><div>        ,data=<a href="http://dat.in">dat.in</a></div>
<div>        ,xlab="Tipo"</div><div>        ,ylab="Sep"</div><div>        ,layout=c(1,4)</div><div>        ,as.table=T</div><div>  )</div><div><br></div><div><br></div><div>barchart(</div><div>  sep ~ id</div>
<div>  ,horizontal=F</div><div>  ,data=<a href="http://dat.in">dat.in</a></div><div>  ,xlab="Tipo"</div><div>  ,ylab="Sep"</div><div>)</div><div><br></div></font></div><div style><font face="verdana, sans-serif">#########################</font></div>
<div style><font face="verdana, sans-serif"><br></font></div><div style><font face="verdana, sans-serif"><br></font></div><div style><font face="verdana, sans-serif"><br></font></div><div><font face="verdana, sans-serif"><br>
</font></div><div><font face="verdana, sans-serif">Saludos,</font></div><div><font face="verdana, sans-serif">Carlos Ortega</font></div><div><font face="verdana, sans-serif"><a href="http://www.qualityexcellence.es">www.qualityexcellence.es</a></font></div>
</div><div class="gmail_extra"><br><br><div class="gmail_quote">El 17 de enero de 2013 07:45, Marcuzzi, Javier <span dir="ltr"><<a href="mailto:javier.ruben.marcuzzi@gmail.com" target="_blank">javier.ruben.marcuzzi@gmail.com</a>></span> escribió:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Manuel<br>
<br>
No se si entiendo correctamente su pregunta, pero podría hacer (usando<br>
irónicamente pero para ser claro y no como falta hacia usted).<br>
<br>
resultado.final <- data.frame(seno, coseno, suma, original, edad_abuela,<br>
probabilidad_de_c, distancia_del_sol)<br>
<br>
Donde todo lo que coloca en el data frame son resultados calculados o<br>
definidos por separado.<br>
<br>
Disculpe la redacción algo irrespetuosa, pero es para colocar en<br>
térmicos entendibles lo que posiblemente no entendí de su pregunta.<br>
<br>
Javier<br>
<br>
El mié, 16-01-2013 a las 20:50 -0600, Manuel Máquez escribió:<br>
<div><div class="h5">> Hola colegas:<br>
> Siguiendo la idea que me hizo el favor de darme Carlos Ortega busqué<br>
> en "tseries" algo que me ayudara a determinar la probabilidad de que<br>
> un evento "sep" se diera en "tpo" y envié una serie como la que<br>
> adjunto.<br>
> La columna "A" tiene el orden en que se llevaron a cabo los eventos.<br>
> Las columnas "B" y "C" tienen los datos de la sucesión original de<br>
> eventos "sep" y "tpo", donde "sep" varía entre 1 y 20, mientras que<br>
> "tpo" es tipo factor que codificado es 1, 2, 3 y 7.<br>
> Las columnas "E" y "G" siguen teniendo los datos originales. La "F"<br>
> acumula mientras no cambie "tpo".<br>
> Por último en las columnas "I" y "J" se han puesto los datos que<br>
> estaban en rojo con objeto de llegar a obtener mínimo, primer cuartil,<br>
> mediana, media, desviación típica, tercer cuartil y máximo.<br>
> Hay alguna(s) funciones en R que puedan hacer lo anterior y alguna(s)<br>
> con las que se pueda obtener la probabilidad de "tpo".<br>
> Gracias anticipadas.<br>
> MANOLO MÁRQUEZ P.<br>
</div></div>> _______________________________________________<br>
> R-help-es mailing list<br>
> <a href="mailto:R-help-es@r-project.org">R-help-es@r-project.org</a><br>
> <a href="https://stat.ethz.ch/mailman/listinfo/r-help-es" target="_blank">https://stat.ethz.ch/mailman/listinfo/r-help-es</a><br>
<br>
_______________________________________________<br>
R-help-es mailing list<br>
<a href="mailto:R-help-es@r-project.org">R-help-es@r-project.org</a><br>
<a href="https://stat.ethz.ch/mailman/listinfo/r-help-es" target="_blank">https://stat.ethz.ch/mailman/listinfo/r-help-es</a><br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br><span style="font-family:verdana,sans-serif">Saludos,</span><br style="font-family:verdana,sans-serif">
<span style="font-family:verdana,sans-serif">Carlos Ortega</span><br style="font-family:verdana,sans-serif">
<span style="font-family:verdana,sans-serif"><a href="http://www.qualityexcellence.es" target="_blank">www.qualityexcellence.es</a></span>
</div>