[Rd] prettyNum digits=0 not compatible with scientific notation

[Marc Schwartz]

> On Mar 22, 2019, at 7:25 PM, peter dalgaard <pdalgd using gmail.com> wrote:
> 
> 
> 
>> On 22 Mar 2019, at 18:07 , Martin Maechler <maechler using stat.math.ethz.ch> wrote:
>> 
>> gives (on Linux R 3.5.3, Fedora 28)
>> 
>>      d=10         d=7          d=2      d=1     d=0       
>> [1,] "123456"     "123456"     "123456" "1e+05" "%#4.0-1e"
>> [2,] "12345.6"    "12345.6"    "12346"  "12346" "%#4.0-1e"
>> [3,] "1234.56"    "1234.56"    "1235"   "1235"  "1235"    
>> [4,] "123.456"    "123.456"    "123"    "123"   "123"     
>> [5,] "12.3456"    "12.3456"    "12"     "12"    "12"      
>> [6,] "1.23456"    "1.23456"    "1.2"    "1"     "1"       
>> [7,] "0.123456"   "0.123456"   "0.12"   "0.1"   "0"       
>> [8,] "0.0123456"  "0.0123456"  "0.012"  "0.01"  "0"       
>> [9,] "0.00123456" "0.00123456" "0.0012" "0.001" "0"       
>> 
>> but probably looks better on Mac
> 
> 
> Yes (3.5.1 though)
> 
>> nn <- 123456*10^(0:-8); dd <- c(10, 7, 2:0); names(dd) <- paste0("d=",dd)
>> sapply(dd, function(dig) sapply(nn, format, digits=dig))
>      d=10         d=7          d=2      d=1     d=0     
> [1,] "123456"     "123456"     "123456" "1e+05" "1.e+05"
> [2,] "12345.6"    "12345.6"    "12346"  "12346" "1.e+04"
> [3,] "1234.56"    "1234.56"    "1235"   "1235"  "1235"  
> [4,] "123.456"    "123.456"    "123"    "123"   "123"   
> [5,] "12.3456"    "12.3456"    "12"     "12"    "12"    
> [6,] "1.23456"    "1.23456"    "1.2"    "1"     "1"     
> [7,] "0.123456"   "0.123456"   "0.12"   "0.1"   "0"     
> [8,] "0.0123456"  "0.0123456"  "0.012"  "0.01"  "0"     
> [9,] "0.00123456" "0.00123456" "0.0012" "0.001" "0"  
> 


Here is 3.5.3 on macOS:

> nn <- 123456*10^(0:-8); dd <- c(10, 7, 2:0); names(dd) <- paste0("d=",dd)
> sapply(dd, function(dig) sapply(nn, format, digits=dig))
      d=10         d=7          d=2      d=1     d=0     
 [1,] "123456"     "123456"     "123456" "1e+05" "1.e+05"
 [2,] "12345.6"    "12345.6"    "12346"  "12346" "1.e+04"
 [3,] "1234.56"    "1234.56"    "1235"   "1235"  "1235"  
 [4,] "123.456"    "123.456"    "123"    "123"   "123"   
 [5,] "12.3456"    "12.3456"    "12"     "12"    "12"    
 [6,] "1.23456"    "1.23456"    "1.2"    "1"     "1"     
 [7,] "0.123456"   "0.123456"   "0.12"   "0.1"   "0"     
 [8,] "0.0123456"  "0.0123456"  "0.012"  "0.01"  "0"     
 [9,] "0.00123456" "0.00123456" "0.0012" "0.001" "0"     


Regards,

Marc Schwartz