1# exponents correct in presence of NA
2
3    Code
4      format(split_decimal_bw(c(NA, 1e-05)), justify = "right")
5    Output
6      [1] "NA   " " 1e-5"
7
8# output test
9
10    Code
11      pillar(add_special(10^c(-9, -6, 3, 9)), width = 10)
12    Output
13      <pillar>
14           <dbl>
15            1e-9
16            1e-6
17            1e+3
18            1e+9
19           NA
20         -Inf
21          Inf
22    Code
23      pillar(add_special((10^c(3, 9, 15, 22)) * c(-1, 1)), width = 10)
24    Output
25      <pillar>
26           <dbl>
27           -1e 3
28            1e 9
29           -1e15
30            1e22
31           NA
32         -Inf
33          Inf
34    Code
35      pillar(add_special(1.25 * 10^(-309:-319)), width = 10)
36    Output
37      NULL
38
39