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

[peter dalgaard]

> 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"  


   
-- 
Peter Dalgaard, Professor,
Center for Statistics, Copenhagen Business School
Solbjerg Plads 3, 2000 Frederiksberg, Denmark
Phone: (+45)38153501
Office: A 4.23
Email: pd.mes using cbs.dk  Priv: PDalgd using gmail.com