<div dir="ltr">Aqui estan en formato csv,<div><br></div><div>Antonio</div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Wed, 4 Sep 2019 at 19:19, Carlos Ortega <<a href="mailto:cof@qualityexcellence.es">cof@qualityexcellence.es</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr"><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small">¿Puedes compartir los datos?...</div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small">No veo otra forma...<br></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">El mié., 4 sept. 2019 a las 18:54, Antonio Rodriguez Andres (<<a href="mailto:antoniorodriguezandres70@gmail.com" target="_blank">antoniorodriguezandres70@gmail.com</a>>) escribió:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr">No me sale error pero no me imprime la linea, ni ningun gráfico por pais.</div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Wed, 4 Sep 2019 at 18:42, neo <<a href="mailto:ericconchamunoz@gmail.com" target="_blank">ericconchamunoz@gmail.com</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">podría ser el problema el tipo de dato en X y el tipo de gráfico que <br>
intentas hacer ?<br>
<br>
si Year es entero y estas pidiendo que el gráfico sea tipo "I", podría <br>
ser que quizá eso te produce el error ?<br>
<br>
si pruebas a cambiar X a numérico (continuo) ?<br>
<br>
Slds,<br>
<br>
Eric.<br>
<br>
<br>
<br>
<br>
On 04-09-19 13:06, Antonio Rodriguez Andres wrote:<br>
> Lo que obtengo es dim(currcty)  = NULL<br>
><br>
> lo que hice es crear una lista de paises<br>
><br>
> countrylist <- unique(length(eco_freedom2$Countries)<br>
><br>
> Los datos son de esta forma<br>
> head(eco_freedom2, 5)<br>
>      Year ISO_Code Countries SUMMARY.INDEX X1..Size.of.Government<br>
> 641 2000      AGO    Angola            NA                     NA<br>
> 601 2001      AGO    Angola            NA                     NA<br>
> 561 2002      AGO    Angola            NA                     NA<br>
> 521 2003      AGO    Angola            NA                     NA<br>
> 481 2004      AGO    Angola            NA                     NA<br>
><br>
> On Wed, 4 Sep 2019 at 16:53, Carlos Ortega <<a href="mailto:cof@qualityexcellence.es" target="_blank">cof@qualityexcellence.es</a>> wrote:<br>
><br>
>> ¿Puedes compartir los datos?..<br>
>><br>
>> Otra cosa que puede ayudar es esto lo destaco en rojo.<br>
>> Creo que en alguno de los casos te quedas sin datos en tu data.frame.<br>
>><br>
>> Con ese mensaje puedes ver justamente el tamaño de cada dataframe en cada<br>
>> iteración.<br>
>><br>
>><br>
>> for (i in 1:length(countrylist)){<br>
>>       currcty <- countrylist[i]<br>
>>      * print(dim(currcty))*<br>
>>      filename <- paste("index",currcty,".png",sep="")<br>
>>      png(filename,width=800,height=600)<br>
>><br>
>> plot(y=eco_freedom3$SUMMARY.INDEX[eco_freedom3$Countries==currcty],<br>
>> x=eco_freedom3$Year[eco_freedom3$Countries==currcty], ylim = c(2.85, 8.20),<br>
>> xlim = c(2000, 2016), type="l", ylab="INDEX",xlab="YEAR", main =<br>
>> paste("Countries", currcty))<br>
>>      dev.off()<br>
>>    }<br>
>><br>
>> El mié., 4 sept. 2019 a las 14:52, Antonio Rodriguez Andres (<<br>
>> <a href="mailto:antoniorodriguezandres70@gmail.com" target="_blank">antoniorodriguezandres70@gmail.com</a>>) escribió:<br>
>><br>
>>> Carlos<br>
>>> Al especificar los limites, no me sale ningun error, aunque no consigue<br>
>>> graficar, nada,<br>
>>><br>
>>><br>
>>>    # Look at the time series for each country for the time period, for<br>
>>> instance GDPPC<br>
>>>    for (i in 1:length(countrylist)){<br>
>>>       currcty <- countrylist[i]<br>
>>>      filename <- paste("index",currcty,".png",sep="")<br>
>>>      png(filename,width=800,height=600)<br>
>>><br>
>>> plot(y=eco_freedom3$SUMMARY.INDEX[eco_freedom3$Countries==currcty],<br>
>>> x=eco_freedom3$Year[eco_freedom3$Countries==currcty], ylim = c(2.85, 8.20),<br>
>>> xlim = c(2000, 2016), type="l", ylab="INDEX",xlab="YEAR",<br>
>>>           main = paste("Countries", currcty))<br>
>>>      dev.off()<br>
>>>    }<br>
>>><br>
>>> On Wed, 4 Sep 2019 at 11:57, Carlos Ortega <<a href="mailto:cof@qualityexcellence.es" target="_blank">cof@qualityexcellence.es</a>><br>
>>> wrote:<br>
>>><br>
>>>> Hola,<br>
>>>><br>
>>>> Pon un "print(i)" en tu bucle para ver en qué número/paso del bucle te<br>
>>>> aparece el error.<br>
>>>> Y con ese "i" haz la selección del dataframe y mira que pasa.. puede que<br>
>>>> para ese caso, al quitar los NAs te quedes sin datos...<br>
>>>><br>
>>>> Es una forma de debugear...<br>
>>>><br>
>>>> Gracias,<br>
>>>> Carlos Ortega<br>
>>>> <a href="http://www.qualityexcellence.es" rel="noreferrer" target="_blank">www.qualityexcellence.es</a><br>
>>>><br>
>>>><br>
>>>> El mié., 4 sept. 2019 a las 11:17, Antonio Rodriguez Andres (<<br>
>>>> <a href="mailto:antoniorodriguezandres70@gmail.com" target="_blank">antoniorodriguezandres70@gmail.com</a>>) escribió:<br>
>>>><br>
>>>>> Hola queridos usuarios de R<br>
>>>>><br>
>>>>> Estoy intentando hacer un gráfico de una variable en el tiempo para un<br>
>>>>> conjunto de países usando R base, con el comando plot. Tengo 40 países y<br>
>>>>> son 15 años. Lo quiero salvar como formato png, cada uno de ellos.<br>
>>>>><br>
>>>>> Tengo el siguiente código,<br>
>>>>><br>
>>>>> for (i in 1:length(countrylist)){<br>
>>>>>      currcty <- countrylist[i]<br>
>>>>>      filename <- paste("index",currcty,".png",sep="")<br>
>>>>>      png(filename,width=800,height=600)<br>
>>>>><br>
>>>>> plot(y=eco_freedom2$SUMMARY.INDEX[eco_freedom2$Countries==currcty],<br>
>>>>> x=eco_freedom2$Year[eco_freedom2$Countries==currcty], type="l",<br>
>>>>> ylab="INDEX",xlab="YEAR",<br>
>>>>>           main = paste("Countries", currcty))<br>
>>>>>      dev.off()<br>
>>>>>    }<br>
>>>>><br>
>>>>> Pero me aparece el error Error in plot.window(...) : se necesitan<br>
>>>>> valores<br>
>>>>> finitos de 'xlim'. La variable y = SUMMARY.INDEX tiene valores Nas, y es<br>
>>>>> tipo numerico, y la variable x= Year es integer. Entiendo que es por el<br>
>>>>> problema de los NAs, por lo que da error.<br>
>>>>> Si embargo al usar na.omit(dataset), y quedarnos con los valores que no<br>
>>>>> son<br>
>>>>> NA, me sigue saliendo el mismo error<br>
>>>>><br>
>>>>> Alguna idea,<br>
>>>>><br>
>>>>> gracias<br>
>>>>><br>
>>>>> --<br>
>>>>><br>
>>>>> Member, Editorial Committee, *The Economic and Labour Relations Review*<br>
>>>>> (a<br>
>>>>> SAGE journal)<br>
>>>>><br>
>>>>> <a href="http://elr.sagepub.com/" rel="noreferrer" target="_blank">http://elr.sagepub.com/</a><br>
>>>>><br>
>>>>> Member, Editorial Committee, African Journal of Economic and Management<br>
>>>>> Studies<br>
>>>>><br>
>>>>><br>
>>>>> <a href="http://emeraldgrouppublishing.com/products/journals/editorial_team.htm?id=ajems" rel="noreferrer" target="_blank">http://emeraldgrouppublishing.com/products/journals/editorial_team.htm?id=ajems</a><br>
>>>>><br>
>>>>> <a href="https://www.researchgate.net/profile/Antonio_Andres" rel="noreferrer" target="_blank">https://www.researchgate.net/profile/Antonio_Andres</a> (Research Gate<br>
>>>>> profile)<br>
>>>>><br>
>>>>>          [[alternative HTML version deleted]]<br>
>>>>><br>
>>>>> _______________________________________________<br>
>>>>> R-help-es mailing list<br>
>>>>> <a href="mailto:R-help-es@r-project.org" target="_blank">R-help-es@r-project.org</a><br>
>>>>> <a href="https://stat.ethz.ch/mailman/listinfo/r-help-es" rel="noreferrer" target="_blank">https://stat.ethz.ch/mailman/listinfo/r-help-es</a><br>
>>>>><br>
>>>><br>
>>>> --<br>
>>>> Saludos,<br>
>>>> Carlos Ortega<br>
>>>> <a href="http://www.qualityexcellence.es" rel="noreferrer" target="_blank">www.qualityexcellence.es</a><br>
>>>><br>
>>><br>
>>> --<br>
>>><br>
>>> Member, Editorial Committee, *The Economic and Labour Relations Review* (a<br>
>>> SAGE journal)<br>
>>><br>
>>> <a href="http://elr.sagepub.com/" rel="noreferrer" target="_blank">http://elr.sagepub.com/</a><br>
>>><br>
>>> Member, Editorial Committee, African Journal of Economic and Management<br>
>>> Studies<br>
>>><br>
>>><br>
>>> <a href="http://emeraldgrouppublishing.com/products/journals/editorial_team.htm?id=ajems" rel="noreferrer" target="_blank">http://emeraldgrouppublishing.com/products/journals/editorial_team.htm?id=ajems</a><br>
>>><br>
>>> <a href="https://www.researchgate.net/profile/Antonio_Andres" rel="noreferrer" target="_blank">https://www.researchgate.net/profile/Antonio_Andres</a> (Research Gate<br>
>>> profile)<br>
>>><br>
>>><br>
>>><br>
>> --<br>
>> Saludos,<br>
>> Carlos Ortega<br>
>> <a href="http://www.qualityexcellence.es" rel="noreferrer" target="_blank">www.qualityexcellence.es</a><br>
>><br>
><br>
</blockquote></div><br clear="all"><div><br></div>-- <br><div dir="ltr" class="gmail-m_5329400977612333048gmail-m_-4897912158171663752gmail_signature"><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><p style="margin:0cm 0cm 0.0001pt;font-size:11pt;font-family:Calibri,sans-serif">Member, Editorial Committee, <i>The Economic and Labour Relations Review</i> (a SAGE journal)<u></u><u></u></p><p style="margin:0cm 0cm 0.0001pt;font-size:11pt;font-family:Calibri,sans-serif"><a href="http://elr.sagepub.com/" style="color:rgb(17,85,204)" target="_blank">http://elr.sagepub.com/</a></p><p style="margin:0cm 0cm 0.0001pt;font-size:11pt;font-family:calibri,sans-serif"><span style="font-size:11pt">Member, Editorial Committee, African Journal of Economic and Management Studies</span><br></p><p style="font-size:small;margin:0cm 0cm 0.0001pt"><font face="Calibri, sans-serif"><span style="font-size:14.6667px"><a href="http://emeraldgrouppublishing.com/products/journals/editorial_team.htm?id=ajems" target="_blank">http://emeraldgrouppublishing.com/products/journals/editorial_team.htm?id=ajems</a></span></font><br></p><p style="margin:0cm 0cm 0.0001pt;font-size:11pt;font-family:calibri,sans-serif"><a href="https://www.researchgate.net/profile/Antonio_Andres" style="color:rgb(17,85,204);font-size:14.6667px" target="_blank">https://www.researchgate.net/profile/Antonio_Andres</a><span style="font-size:14.6667px"> </span><span style="font-size:14.6667px">(Research Gate profile)</span><br></p><p style="font-size:small;margin:0cm 0cm 0.0001pt"><br></p></div></div></div></div></div>
</blockquote></div><br clear="all"><br>-- <br><div dir="ltr" class="gmail-m_5329400977612333048gmail_signature"><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>
</blockquote></div><br clear="all"><div><br></div>-- <br><div dir="ltr" class="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><p style="margin:0cm 0cm 0.0001pt;font-size:11pt;font-family:Calibri,sans-serif">Member, Editorial Committee, <i>The Economic and Labour Relations Review</i> (a SAGE journal)<u></u><u></u></p><p style="margin:0cm 0cm 0.0001pt;font-size:11pt;font-family:Calibri,sans-serif"><a href="http://elr.sagepub.com/" style="color:rgb(17,85,204)" target="_blank">http://elr.sagepub.com/</a></p><p style="margin:0cm 0cm 0.0001pt;font-size:11pt;font-family:calibri,sans-serif"><span style="font-size:11pt">Member, Editorial Committee, African Journal of Economic and Management Studies</span><br></p><p style="font-size:small;margin:0cm 0cm 0.0001pt"><font face="Calibri, sans-serif"><span style="font-size:14.6667px"><a href="http://emeraldgrouppublishing.com/products/journals/editorial_team.htm?id=ajems" target="_blank">http://emeraldgrouppublishing.com/products/journals/editorial_team.htm?id=ajems</a></span></font><br></p><p style="margin:0cm 0cm 0.0001pt;font-size:11pt;font-family:calibri,sans-serif"><a href="https://www.researchgate.net/profile/Antonio_Andres" style="color:rgb(17,85,204);font-size:14.6667px" target="_blank">https://www.researchgate.net/profile/Antonio_Andres</a><span style="font-size:14.6667px"> </span><span style="font-size:14.6667px">(Research Gate profile)</span><br></p><p style="font-size:small;margin:0cm 0cm 0.0001pt"><br></p></div></div></div></div></div>