Pessoal, estou tentando gerar os parametros de weibull no R, mas não estou conseguindoConforme orientaçao do Bruno obtive um erro, e não estou entendendo.alguem pode ajudar? library(MASS)> dados<-read.table("teste.txt",header=FALSE)> is.na(dados) <- dados == -999.9> vento50<-fitdistr(dados[[1]],densfun="weibull")Mensagens de aviso perdidas:In dweibull(x, shape, scale, log) : NaNs produzidos> is.na(dados) <- dados == -999> vento50<-fitdistr(dados[[1]],densfun="weibull")Mensagens de aviso perdidas:In dweibull(x, shape, scale, log) : NaNs produzidos> str(vento50)List of 5 $ estimate: Named num [1:2] 1.39 2.11 ..- attr(*, "names")= chr [1:2] "shape" "scale" $ sd : Named num [1:2] 0.191 0.292 ..- attr(*, "names")= chr [1:2] "shape" "scale" $ vcov : num [1:2, 1:2] 0.0366 0.0184 0.0184 0.0854 ..- attr(*, "dimnames")=List of 2 .. ..$ : chr [1:2] "shape" "scale" .. ..$ : chr [1:2] "shape" "scale" $ loglik : num -46.9 $ n : int 30 - attr(*, "class")= chr "fitdistr">