A solução seria você escrever uma função de teste de Shapiro usando a biblioteca Rmprf! E se você o fizer colocá-la no namespace do pacote Rmprf de tal sorte que o uso dela a ativasse. HTH -- Cesar Rabak PS.: Não entro na seara, neste post, se faz sentido fazer um teste de Shapiro para números dessa magnitude. On Mon, Dec 12, 2016 at 11:12 AM, Luiz Leal via R-br < r-br@listas.c3sl.ufpr.br> wrote:
Muito obrigado pela sugestão, mas ocorreu outro problema
library(Rmpfr) p <- mpfr(c(500,600,700)^(-10), precBits=255) - mpfr(1,precBits=255) shapiro.test(p) Erro: is.numeric(x) is not TRUE shapiro.test(as.numeric(p)) Erro em shapiro.test(as.numeric(p)) : all 'x' values are identical
Há como solucionar?
Desde já gradeço
Luiz
On Saturday, December 10, 2016 10:25 PM, salah via R-br < r-br@listas.c3sl.ufpr.br> wrote:
segue sugestão
library(Rmpfr)
mpfr(500^(-10), precBits = 255) - mpfr(1, precBits = 255) # 1 'mpfr' number of precision 255 bits # [1] -0.999999999999999999999999998975999999999999914663505297831951 000646311908486498
## caracteristica numerica da maquina .Machine
_______________________________________________ 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 fornea cdigo mnimo reproduzvel.
_______________________________________________ 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.