340

我有一个包含一列 p 值的数据框，我想对这些 p 值进行选择。

> pvalues_anova
[1] 9.693919e-01 9.781728e-01 9.918415e-01 9.716883e-01 1.667183e-02
[6] 9.952762e-02 5.386854e-01 9.997699e-01 8.714044e-01 7.211856e-01
[11] 9.536330e-01 9.239667e-01 9.645590e-01 9.478572e-01 6.243775e-01
[16] 5.608563e-01 1.371190e-04 9.601970e-01 9.988648e-01 9.698365e-01
[21] 2.795891e-06 1.290176e-01 7.125751e-01 5.193604e-01 4.835312e-04

选择方式：

anovatest<- results[ - which(results$pvalues_anova < 0.8) ,]

如果我在 R 中使用该函数，它工作得非常好。但如果我在另一个应用程序（星系）中运行它，没有e-01例如的数字4.835312e-04不会被丢弃。

是否有另一种表示 p 值的方法，例如0.0004835312代替4.835312e-04？

4

3 回答 3

633

您可以使用以下代码有效地删除打印中的科学记数法：

options(scipen=999)
于 2011-03-18T13:01:17.047 回答
9 
format(99999999,scientific = FALSE)

给

99999999
于 2021-02-24T13:02:46.490 回答
1

prettyNum(..., scientific = FALSE)当我不想要尾随零时，我还发现功能对打印很有用。请注意，这些函数可用于打印目的，即这些函数的输出是字符串，而不是数字。

p_value <- c(2.45496e-5, 3e-17, 5.002e-5, 0.3, 123456789.123456789)
format(p_value, scientific = FALSE)
#> [1] "        0.00002454960000000" "        0.00000000000000003"
#> [3] "        0.00005002000000000" "        0.29999999999999999"
#> [5] "123456789.12345679104328156"


format(p_value, scientific = FALSE, drop0trailing = TRUE)
#> [1] "        0.0000245496"        "        0.00000000000000003"
#> [3] "        0.00005002"          "        0.29999999999999999"
#> [5] "123456789.12345679104328156"


# Please note that the last number's last two digits are rounded:
prettyNum(p_value, scientific = FALSE, digits = 16)
#> [1] "0.0000245496"        "0.00000000000000003" "0.00005002"         
#> [4] "0.3"                 "123456789.1234568"
于 2021-11-30T19:36:56.200 回答