Outra duvida. Estou tentando simular dados, tal como um exemplo em outro programa... Exemplo abaixo: proc iml; do i=1 to 1000; seed=456; var=150; w = RANNOR(seed)*SQRT(var); end; *tentei:* set.seed(456) var <- 150 for (i in 1:1000) { w [i] <- rnorm * sqrt(varg) } *ERRO:* Erro em W[j] <- 1 : objeto 'W' não encontrado
O R é vetorial e nao precisa entao fgeraR DENTRO DE UM LOOP w <- rnorm(1000, sd=sqrt(var)) On Tue, 23 Aug 2011, Ricardo Pereira wrote:
Outra duvida. Estou tentando simular dados, tal como um exemplo em outro programa... Exemplo abaixo:
proc iml; do i=1 to 1000; seed=456; var=150; w = RANNOR(seed)*SQRT(var); end;
tentei:
set.seed(456) var <- 150 for (i in 1:1000) { w [i] <- rnorm * sqrt(varg) }
ERRO:
Erro em W[j] <- 1 : objeto 'W' não encontrado
Olá, Declare a matriz W. w <- matrix(0,linhas,colunas) É uma saída. Até Crysttian Arantes Paixão Universidade Federal de Lavras - UFLA Cel: 35 8876-9187 (Oi) 35 9189-7272 (Tim) Linux User: 456734 - Debian “Se fiz descobertas valiosas, foi mais por ter paciência do que qualquer outro talento.” [Isaac Newton] "Otimismo é esperar pelo melhor. Confiança é saber lidar com o pior." [Roberto Simonsen] "Mesmo as noites totalmente sem estrelas podem anunciar a aurora de uma grande realização." [Martin Luther King] Em 23 de agosto de 2011 11:23, Ricardo Pereira <huahuag@gmail.com> escreveu:
Outra duvida. Estou tentando simular dados, tal como um exemplo em outro programa... Exemplo abaixo:
proc iml; do i=1 to 1000; seed=456; var=150; w = RANNOR(seed)*SQRT(var); end;
*tentei:*
set.seed(456) var <- 150 for (i in 1:1000) { w [i] <- rnorm * sqrt(varg) }
*ERRO:*
Erro em W[j] <- 1 : objeto 'W' não encontrado
_______________________________________________ R-br mailing list R-br@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.
Me desculpem, nao copiei tudo... Como podem ver abaixo, já havia criado a matriz W. set.seed(456) w <- matrix(0, 1000, 1) var <- 150 for (i in 1:1000) { w [i] <- rnorm * sqrt(varg) } E mesmo assim ocorre o erro: Erro em W[j] <- 1 : objeto 'W' não encontrado
seu exemplo nao e' reproduzivel. o erro q vc deve ter e' algo como erro de operacao binaria, pq "rnorm" nao esta' definido. rnorm(1) e' o q vc queria.
Fora que pelo erro ele está definindo a matriz 'w' e depois chamando 'W'. 2011/8/23 Benilton Carvalho <beniltoncarvalho@gmail.com>:
seu exemplo nao e' reproduzivel.
o erro q vc deve ter e' algo como erro de operacao binaria, pq "rnorm" nao esta' definido.
rnorm(1) e' o q vc queria. _______________________________________________ R-br mailing list R-br@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.
Abaixo o exemplo que estou rodando em minha maquina, e em seguida o erro. Mesmo com o *rnorm(1)*, que o Benilton me corrigiu. Abraço Ricardo ## Simulacao de dados set.seed(456) n <- 50 var <- 150 x <- matrix(0, 1000, 5) w <- matrix(0, 1000, 1) y <- matrix(0, 1000, 1) b <- matrix(0, 1000, 1) ## Gera w's para a matriz w for (i in 1:1000) { x [i,1] <- i w[i] <- rnorm (1) *sqrt(var) y[i] <- NULL if i <= n b[i] <- 1 else b[i] <- 2 } Erro: símbolo inesperado em: " y[i] <- NULL if i"> b[i] <- 1Erro em b[i] <- 1 : objeto 'i' não encontrado> else b[i] <- 2Erro: 'else' inesperado em " else"> }Erro: '}' inesperado em " }"
*## Simulacao de dados set.seed(456) n <- 50 var <- 150 x <- matrix(0, 1000, 5) w <- matrix(0, 1000, 1) y <- matrix(0, 1000, 1) b <- matrix(0, 1000, 1) ## Gera w's para a matriz w for (i in 1:1000) { x [i,1] <- i w[i] <- rnorm (1) *sqrt(var) y[i] <- NA if(i <= n){ b[i] <- 1} else b[i] <- 2 } Só não entendi o pq da criação de x e y *Atenciosamente, Leandro Marino http://www.leandromarino.com.br (Fotógrafo) http://est.leandromarino.com.br/Blog (Estatístico) Cel.: + 55 21 9845-7707 Cel.: + 55 21 8777-7907 Em 23 de agosto de 2011 12:53, Ricardo Pereira <huahuag@gmail.com> escreveu:
Abaixo o exemplo que estou rodando em minha maquina, e em seguida o erro. Mesmo com o *rnorm(1)*, que o Benilton me corrigiu.
Abraço
Ricardo
## Simulacao de dados set.seed(456) n <- 50 var <- 150 x <- matrix(0, 1000, 5)
w <- matrix(0, 1000, 1) y <- matrix(0, 1000, 1) b <- matrix(0, 1000, 1)
## Gera w's para a matriz w
for (i in 1:1000) { x [i,1] <- i w[i] <- rnorm (1) *sqrt(var) y[i] <- NULL if i <= n b[i] <- 1 else b[i] <- 2 }
Erro: símbolo inesperado em: " y[i] <- NULL if i"> b[i] <- 1Erro em b[i] <- 1 : objeto 'i' não encontrado> else b[i] <- 2Erro: 'else' inesperado em " else"> }Erro: '}' inesperado em " }"
_______________________________________________ R-br mailing list R-br@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.
Alguma resposta para o erro abaixo? Erro: símbolo inesperado em: " y[i] <- NULL if i"> b[i] <- 1Erro em b[i] <- 1 : objeto 'i' não encontrado> else b[i] <- 2Erro: 'else' inesperado em " else"> }Erro: '}' inesperado em " }"
O Leandro Marino já mostrou o que estava errado no seu código. 2011/8/23 Ricardo Pereira <huahuag@gmail.com>:
Alguma resposta para o erro abaixo?
Erro: símbolo inesperado em: " y[i] <- NULL if i"
b[i] <- 1
Erro em b[i] <- 1 : objeto 'i' não encontrado
else b[i] <- 2
Erro: 'else' inesperado em " else"
}
Erro: '}' inesperado em " }"
_______________________________________________ R-br mailing list R-br@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.
O *ceiling* no R é o mesmo que *ceil* no SAS??? A sequencia abaixo também está retornando erro... ## Simulacao de dados set.seed(456) n <- 50 var <- 150 for (i in 1000:2000) { x [i,1] <- i x [i,2] <- ceiling (runif(1)*60) x [i,3] <- ceiling (runif(1)*50)+60 b [i] <- ceiling (runif(1)*2) } ERRO: Erro em x[i, 1] <- i : índice fora de limites * Que limites???* Obrigado Ricardo
Vou chutar já que você colou só uma parte do código, mas: length(1000:2000) NROW(x) x deve ter 1000 linhas e você está rodando o for 1001 vezes. 2011/8/23 Ricardo Pereira <huahuag@gmail.com>:
O ceiling no R é o mesmo que ceil no SAS???
A sequencia abaixo também está retornando erro...
## Simulacao de dados set.seed(456) n <- 50 var <- 150
for (i in 1000:2000) { x [i,1] <- i x [i,2] <- ceiling (runif(1)*60) x [i,3] <- ceiling (runif(1)*50)+60 b [i] <- ceiling (runif(1)*2) }
ERRO:
Erro em x[i, 1] <- i : índice fora de limites
Que limites???
Obrigado
Ricardo
_______________________________________________ R-br mailing list R-br@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.
Se teu x for igual ao de antes (* x <- matrix(0, 1000, 5) *), tu ta tentando alterar a 1001ª linha, que não existe 2011/8/23 Gustavo Carvalho <gustavo.bio@gmail.com>
Vou chutar já que você colou só uma parte do código, mas:
length(1000:2000)
NROW(x)
x deve ter 1000 linhas e você está rodando o for 1001 vezes.
2011/8/23 Ricardo Pereira <huahuag@gmail.com>:
O ceiling no R é o mesmo que ceil no SAS???
A sequencia abaixo também está retornando erro...
## Simulacao de dados set.seed(456) n <- 50 var <- 150
for (i in 1000:2000) { x [i,1] <- i x [i,2] <- ceiling (runif(1)*60) x [i,3] <- ceiling (runif(1)*50)+60 b [i] <- ceiling (runif(1)*2) }
ERRO:
Erro em x[i, 1] <- i : índice fora de limites
Que limites???
Obrigado
Ricardo
_______________________________________________ R-br mailing list R-br@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@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.
Pessoal como eu faço para gerar x números dentro de um intervalo definido a priori? Exemplo: Quero que o R retorne 36 números quaisquer dentro do intervalo 0.9677 e 0.6821 Obrigado De: r-br-bounces@listas.c3sl.ufpr.br [mailto:r-br-bounces@listas.c3sl.ufpr.br] Em nome de Rodrigo Coster Enviada em: Tuesday, August 23, 2011 6:43 PM Para: r-br@listas.c3sl.ufpr.br Assunto: Re: [R-br] gerar dados Se teu x for igual ao de antes ( x <- matrix(0, 1000, 5) ), tu ta tentando alterar a 1001ª linha, que não existe 2011/8/23 Gustavo Carvalho <gustavo.bio@gmail.com> Vou chutar já que você colou só uma parte do código, mas: length(1000:2000) NROW(x) x deve ter 1000 linhas e você está rodando o for 1001 vezes. 2011/8/23 Ricardo Pereira <huahuag@gmail.com>:
O ceiling no R é o mesmo que ceil no SAS???
A sequencia abaixo também está retornando erro...
## Simulacao de dados set.seed(456) n <- 50 var <- 150
for (i in 1000:2000) { x [i,1] <- i x [i,2] <- ceiling (runif(1)*60) x [i,3] <- ceiling (runif(1)*50)+60 b [i] <- ceiling (runif(1)*2) }
ERRO:
Erro em x[i, 1] <- i : índice fora de limites
Que limites???
Obrigado
Ricardo
_______________________________________________ R-br mailing list R-br@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@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.
Hugo, runif(36, 0.6821, .9677) att, FH 2011/10/4 Hugo Zeni <hzeni82@gmail.com>
Pessoal como eu faço para gerar x números dentro de um intervalo definido a priori?****
** **
Exemplo:****
Quero que o R retorne 36 números quaisquer dentro do intervalo 0.9677 e 0.6821****
** **
Obrigado****
** **
*De:* r-br-bounces@listas.c3sl.ufpr.br [mailto: r-br-bounces@listas.c3sl.ufpr.br] *Em nome de *Rodrigo Coster *Enviada em:* Tuesday, August 23, 2011 6:43 PM *Para:* r-br@listas.c3sl.ufpr.br *Assunto:* Re: [R-br] gerar dados****
** **
Se teu x for igual ao de antes (**
*x <- matrix(0, 1000, 5)*****
), tu ta tentando alterar a 1001ª linha, que não existe****
2011/8/23 Gustavo Carvalho <gustavo.bio@gmail.com>****
Vou chutar já que você colou só uma parte do código, mas:
length(1000:2000)
NROW(x)
x deve ter 1000 linhas e você está rodando o for 1001 vezes.****
2011/8/23 Ricardo Pereira <huahuag@gmail.com>:****
O ceiling no R é o mesmo que ceil no SAS???
A sequencia abaixo também está retornando erro...
## Simulacao de dados set.seed(456) n <- 50 var <- 150
for (i in 1000:2000) { x [i,1] <- i x [i,2] <- ceiling (runif(1)*60) x [i,3] <- ceiling (runif(1)*50)+60 b [i] <- ceiling (runif(1)*2) }
ERRO:
Erro em x[i, 1] <- i : índice fora de limites
Que limites???
Obrigado
Ricardo ****
_______________________________________________ R-br mailing list R-br@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@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@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.
set.seed(456) var <- 150 w <- rnorm(1000) * sqrt(varg) Fábio Mathias Corrêa Universidade Estadual de Santa Cruz Departamento de Ciências Exatas e da Terra - DCET Campus Soane Nazaré de Andrade, km 16 Rodovia Ilhéus-Itabuna CEP 45662-900. Ilhéus-Bahia Tel.: 73-3680-5076 ________________________________ De: Ricardo Pereira <huahuag@gmail.com> Para: r-br@listas.c3sl.ufpr.br Enviadas: Terça-feira, 23 de Agosto de 2011 11:23 Assunto: [R-br] gerar dados Outra duvida. Estou tentando simular dados, tal como um exemplo em outro programa... Exemplo abaixo: proc iml; do i=1 to 1000; seed=456; var=150; w = RANNOR(seed)*SQRT(var); end; tentei: set.seed(456) var <- 150 for (i in 1:1000) { w [i] <- rnorm * sqrt(varg) } ERRO: Erro em W[j] <- 1 : objeto 'W' não encontrado _______________________________________________ R-br mailing list R-br@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.
participantes (10)
-
Benilton Carvalho -
Crysttian Arantes -
Fabio Mathias Corrêa -
FHRB Toledo -
Gustavo Carvalho -
Hugo Zeni -
Leandro Marino -
Paulo Justiniano -
Ricardo Pereira -
Rodrigo Coster