f = function(mes, ano){<div>  fn = file.path('C:', ano, paste('Dados ', mes, ' ', ano, '.csv', sep=''))</div><div>  read.csv2(fn)</div><div>}</div><div><br></div><div>tm0411 = f('Abril', 2011)</div>

<div><br></div><div><br></div><div>eh se o file.path falhar para vc (eu nao tenho windows para testar), vc pode substitui-lo por:</div><div><br></div><div>fn = paste('C:/', ano, '/Dados ', mes, ' ', ano, '.csv', sep='')</div>

<div><br></div><div>b</div><div><br><br><div class="gmail_quote">2011/8/2 Carlos Mendonça <span dir="ltr"><<a href="mailto:csaeslpv@centroin.com.br">csaeslpv@centroin.com.br</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">

<div>           Caros, eu queria saber se existe no R alguma "opção" para se passar valores ao programa. Explicando melhor, os meus </div>
<div> </div>
<div>programas lêem e gravam vários arquivos. Os nomes desses arquivos contém as informações de ano, mes, etc. como no exemplo </div>
<div> </div>
<div>a seguir:</div>
<div><br clear="all">tm0411 = read.csv2("C:\\2009\\Dados Abril 2011.csv")</div>
<div> </div>
<div>Eu precisava de alguma coisa do tipo informar no início do programa esses valores de ano e de mes e que substituisse no nome do </div>
<div> </div>
<div>arquivo automaticamente, mais ou menos assim:</div>
<div> </div>
<div>ano = 2011</div>
<div>mes = "Abril"</div>
<div>...</div>
<div>...</div>
<div>...</div>
<div>...</div>
<div>tm0411 = read.csv2("C:\\<strong>&ano</strong>\\Dados <strong>&mes &ano</strong>.csv")</div>
<div> </div>
<div>É possível?</div>
<div> </div>
<div>                Obrigado,</div>
<div> </div><font color="#888888">
<div>                Carlos Mendonça</div><br>
</font><br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br><br clear="all"><br>-- <br>Successful people ask better questions, and as a result, they get better answers. (Tony Robbins)<br>


</div>