I came to report this same bug and found it already in the trash, but
I slightly disagree with that assessment. If it's not a bug, then
perhaps it's a feature request. Comments at the end.
On Mon, May 14, 2007, Duncan Murdoch wrote:
>>On 13/05/2007 8:46 PM, [EMAIL PROTECTED] wrote:
>>
>> In the ex
To reply to my own message, that function wasn't quite right. I think
this one works better:
signif.string <- function(signum,sigdigs){
test <- abs(signum)
left <- nchar(trunc(test))
right <- nchar(test)-left-1
if (test<1) {left<-left-1}
if (right<0) {right<-0}
if (sigdigshttps://stat.