[R-br] [R] Uso da função if

Fernando Antonio de souza nandodesouza em gmail.com
Quarta Março 4 13:34:32 BRT 2015


Michelle é que para que os usuários da lista possam lhe ajudar é necessário
que você forneça um CMR(código mínimo reproduzível) isso permite que
possamos acessar seus dados e refazer os seus comandos e assim lhe orientar
melhor.

Você forneceu o código, no entanto eu não tenho como acessar seus dados,
pois o endereço que vc forneceu no read.table não é o mesmo em meu
computador.

Por isso estou lhe solicitando que faça um dput(seusbancodedados). Após dar
o enter esta função retornara seu banco de dados em um formato que todos os
usuários poderam ter acesso apenas por copiar e colar esta saída no R. Você
copia e cole no email essa saída e assim todos poderão utilizar seus dados
e lhe ajudar de maneira mais rápida

Você pode fornecer todo o banco de dados ou apenas parte dele (no caso de
banco de dados muito grande). O importante é que os dados fornecidos possam
ser reproduzidos pela pessoa que está lhe ajudando.

Em 4 de março de 2015 13:25, Michelle Bau Graczyk <mbgraczyk em gmail.com>
escreveu:

> Oi Fernando,
>
> Me desculpe mas você pode ser um pouco mais claro? Sou iniciante em R e
> por isso ainda tenho muita dificuldade.
>
> Em 4 de março de 2015 13:20, Fernando Antonio de souza <
> nandodesouza em gmail.com> escreveu:
>
> OLÁ
>>
>> Faça um dput(seubancodedados) copie e cole a saída para que seus comandos
>> possa ser replicados e possa lhe ajudar. Acredito que o que você deseja
>> fazer pode ser feito com funções do pacote plyr ou lapply, o que torna
>> muito mais eficiente.
>>
>> Em 4 de março de 2015 13:09, Michelle Bau Graczyk <mbgraczyk em gmail.com>
>> escreveu:
>>
>>> Boa tarde,
>>>
>>> Estou com um problema de lógica para o uso do if. Meu intuito com este
>>> programa é separar por horário os valores do volume. O horário está escrito
>>> de maneira numérica e vai de 1 até 396. O valor máximo de volumes por
>>> horário é 126.
>>> Só que quando tento fazer rodar, vem a mensagem :
>>> Erro em if (AA.data$hora[k] == i) { :
>>>   valor ausente onde TRUE/FALSE necessário
>>>
>>> Abaixo segue o programa.
>>>
>>> AA<-read.table("/Users/bau/Documents/Mestrado/teste/AXP_NYS_USD_1min_EST5EDT_200407s12e.dat",
>>> header=FALSE, col.names=c("data","hora","preco","volume"))
>>> hora<-as.numeric(AA$hora)
>>> AA.data<-data.frame(data=AA$data,hora=hora, preco=AA$preco,
>>> volume=AA$volume)
>>> write.table(AA.data,"testeteste.txt")
>>>
>>> matriz.dadosAA<-matrix(nrow=128,ncol=4)
>>> for(i in 1:4){
>>>
>>>   j<-1
>>>   for(k in 1:48935){
>>>     for(j in 1:126){
>>>     if(AA.data$hora[k]==i){
>>>
>>>
>>>       matriz.dadosAA[j,i]=AA.data$volume[k]
>>>       j=j+1
>>>
>>>
>>>
>>>
>>>
>>>     } else {
>>>
>>>       matriz.dadosAA[j,i]=0
>>>       j=j+1}
>>>
>>>       k=k+1
>>>
>>>     }
>>>   }
>>> }
>>>     a<-matriz.dadosAA[,1]
>>>     write.table(a,"a.txt")
>>>
>>>
>>>
>>> Muito obrigada,
>>>
>>> Michelle
>>>
>>> _______________________________________________
>>> R-br mailing list
>>> R-br em listas.c3sl.ufpr.br
>>> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
>>> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
>>> código mínimo reproduzível.
>>>
>>
>>
>> _______________________________________________
>> R-br mailing list
>> R-br em listas.c3sl.ufpr.br
>> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
>> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
>> código mínimo reproduzível.
>>
>
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
> código mínimo reproduzível.
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150304/688bff55/attachment.html>


Mais detalhes sobre a lista de discussão R-br