[R-br] gerar dados

[Ricardo Pereira]

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 "    }"
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110823/5bebdf1e/attachment.html>