<html><head></head><body><div style="color:#000; background-color:#fff; font-family:HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif;font-size:16px"><div id="yui_3_16_0_ym19_1_1481545240019_4502"><span id="yui_3_16_0_ym19_1_1481545240019_4501">Muito obrigado pela sugestão, mas ocorreu outro problema</span></div><div id="yui_3_16_0_ym19_1_1481545240019_4502"><span><br></span></div><div id="yui_3_16_0_ym19_1_1481545240019_4510">> library(Rmpfr)</div><div id="yui_3_16_0_ym19_1_1481545240019_4511">> p <- mpfr(c(500,600,700)^(-10), precBits=255) - mpfr(1,precBits=255)</div><div id="yui_3_16_0_ym19_1_1481545240019_4512">> shapiro.test(p)</div><div id="yui_3_16_0_ym19_1_1481545240019_4513">Erro: is.numeric(x) is not TRUE</div><div id="yui_3_16_0_ym19_1_1481545240019_4514">> shapiro.test(as.numeric(p))</div><div id="yui_3_16_0_ym19_1_1481545240019_4502"></div><div dir="ltr" id="yui_3_16_0_ym19_1_1481545240019_4515">Erro em shapiro.test(as.numeric(p)) : all 'x' values are identical</div><div dir="ltr" id="yui_3_16_0_ym19_1_1481545240019_4515"><br></div><div dir="ltr" id="yui_3_16_0_ym19_1_1481545240019_4515">Há como solucionar?</div><div dir="ltr" id="yui_3_16_0_ym19_1_1481545240019_4515"><br></div><div dir="ltr" id="yui_3_16_0_ym19_1_1481545240019_4515">Desde já gradeço</div><div dir="ltr" id="yui_3_16_0_ym19_1_1481545240019_4515"><br></div><div dir="ltr" id="yui_3_16_0_ym19_1_1481545240019_4515">Luiz</div> <div class="qtdSeparateBR"><br><br></div><div class="yahoo_quoted" style="display: block;"> <div style="font-family: HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif; font-size: 16px;"> <div style="font-family: HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif; font-size: 16px;"> <div dir="ltr"><font size="2" face="Arial"> On Saturday, December 10, 2016 10:25 PM, salah via R-br <r-br@listas.c3sl.ufpr.br> wrote:<br></font></div> <br><br> <div class="y_msg_container">segue sugestão<br clear="none"><br clear="none">library(Rmpfr)<br clear="none"><br clear="none">mpfr(500^(-10), precBits = 255) - mpfr(1, precBits = 255)<br clear="none"># 1 'mpfr' number of precision 255 bits<br clear="none"># [1] <br clear="none">-0.999999999999999999999999998975999999999999914663505297831951000646311908486498<br clear="none"><br clear="none">## caracteristica numerica da maquina<br clear="none">.Machine<div class="yqt2389073563" id="yqtfd88443"><br clear="none">_______________________________________________<br clear="none">R-br mailing list<br clear="none"><a shape="rect" ymailto="mailto:R-br@listas.c3sl.ufpr.br" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br clear="none"><a shape="rect" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br clear="none">Leia o guia de postagem (<a shape="rect" href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a></div>) e fornea cdigo mnimo reproduzvel.<br><br></div> </div> </div> </div></div></body></html>