From Martin Maechler <maechler@stat.math.ethz.ch>  Tue May 27 16:29:15 1997
From: Martin Maechler <maechler@stat.math.ethz.ch> (Martin Maechler)
Date: Tue, 27 May 97 17:29:15 +0200
Subject: R-alpha: signif( small , d) gives NA
Message-ID: <9705271529.AA02767@>

signif(.) is a <primitive> function.

Unfortunately, I couldn't even find WHERE in the source,
  signif(.) is defined.

Here are the symptoms:

xmin <- .Machine $ double.xmin
signif(xmin,3) #--> NA

umach <- unlist(.Machine)[paste("double.x", c("min","max"), sep='')]
for(dig in 1:10) {cat("dig=",dig,": "); print(signif(umach, digits = dig))}


-------
Why do I "complain"?  
	-- it breaks  str(.Machine), now that I've improved 'str'.
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-devel-request@stat.math.ethz.ch
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


R-alpha: signif( small , d) gives NA
Martin Maechler