Min. 1st Qu. Median Mean 3rd Qu. Max.
3.69e-207 1.73e-01 2.84e-01 1.244e+16 4.52e-01 1.225e+20
here是一个可再现的示例(只有最小显示为0):
> x = seq(from=3.69e-207, to=1.23e+20, length.out=10000)
> summary(x)
Min. 1st Qu. Median Mean 3rd Qu. Max.
0.000e+00 3.075e+19 6.150e+19 6.150e+19 9.225e+19 1.230e+20
> str(summary(x))
'summaryDefault' Named num [1:6] 3.69e-207 3.08e+19 6.15e+19 6.15e+19 9.22e+19 ...
- attr(*, "names")= chr [1:6] "Min." "1st Qu." "Median" "Mean" ...
> summary(x)["Min."]
Min.
3.69e-207
这与打印方法有关。我仍在尝试解开它们,但与此同时,这有效:
vec <- c(1e-200, rep(1, 100), 1e20)
sv <- summary(vec)
unclass(sv)
该摘要将摘要打印为矢量,而不是表格: Min. 1st Qu. Median Mean 3rd Qu.
1.000000e-200 1.000000e+00 1.000000e+00 9.803922e+17 1.000000e+00
Max.
1.000000e+20