segue sugestão
library(Rmpfr)
mpfr(500^(-10), precBits = 255) - mpfr(1, precBits = 255)
# 1 'mpfr' number of precision 255 bits
# [1]
-0.999999999999999999999999998975999999999999914663505297831951000646311908486498
## 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.