[Rd] wishlist -- Fix for major format.pval limitation (PR#9574)

[charles.dupont at vanderbilt.edu]

Full_Name: Charles Dupont
Version: 2.4.1
OS: linux 2.6.18
Submission from: (NULL) (160.129.129.136)


'format.pval' has a major limitation in its implementation. For example
suppose a person had a vector like 'a' and the error being ±0.001.

    > a <- c(0.1, 0.3, 0.4, 0.5, 0.3, 0.0001)
    > format.pval(a, eps=0.01)

If that person wants to have the 'format.pval' output with 2 digits always
showing (like passing nsmall=2 to 'format'). That output would look like 
this.

    [1] "0.10"   "0.30"   "0.40"   "0.50"   "0.30"   "<0.01"

That output is currently impossible because format.pval can only 
produce output like this.

    [1] "0.1"    "0.3"    "0.4"    "0.5"    "0.3"    "<0.01"


---------------------------------------------------------------
a <- c(0.1, 0.3, 0.4, 0.5, 0.3, 0.0001)
format.pval(a, eps=0.01)