如何避免在 R 中以科学计数法显示值？答案

【问题标题】：How can I avoid to show values in scientific notation in R?如何避免在 R 中以科学计数法显示值？
【发布时间】：2020-09-20 02:41:12
【问题描述】：

我在 R 中有这段代码来制作频率表：

TablaFrecs = function(x,k,A,p){
  options(scipen=999)
  L = min(x)-p/2+A*(0:k)
  x_cut = cut(x, breaks = L, right=FALSE)
  intervals = levels(x_cut)
  mc = (L[1]+L[2])/2+A*(0:(k-1))
  Fr.abs = as.vector(table(x_cut)) 
  Fr.rel = round(Fr.abs/length(x),4) 
  Fr.cum.abs = cumsum(Fr.abs) 
  Fr.cum.rel = cumsum(Fr.rel)
  tabla = data.frame(intervals, mc, Fr.abs, Fr.cum.abs, Fr.rel, Fr.cum.rel)
  tabla
}

但它以科学计数法显示间隔

ej 9 是这样的：我正在使用 OFF.COURSE 变量

我已经尝试过 options(scipen=999) 和 format(scientific = F) 但没有解决它。

PD：我还想为我的 TablaFrecs 函数创建一个 hist()，我该怎么做？

【问题讨论】：

您能否提供一个带有常用参数值的函数调用示例？
TablaFrecs(Ej9$OFF.COURSE, k= 27, A = 3646296, p= 0.1) 其中 k 是区间大小，A 是区间大小，p 是精度
Jaffet León，这有帮助，但由于我们没有 Ej9，我们真的也好不到哪里去。
我贴在上面
请不要发布代码/数据/错误的图像：它不能被复制或搜索 (SEO)，它会破坏屏幕阅读器，并且它可能不适合某些移动设备。参考：meta.stackoverflow.com/a/285557（和xkcd.com/2116）。请直接包含代码、控制台输出或数据（例如，dput(head(x)) 或 data.frame(...)）。

标签： r

【解决方案1】：

您可以使用mapply 和format 创建标签：

TablaFrecs = function(x,k,A,p){
  options(scipen=999)
  L = min(x)-p/2+A*(0:k)
  labels = mapply(function(x,y){paste0("[",format(x),",",format(y),")")},L[-length(L)],L[-1])
  x_cut = cut(x,
              breaks = L ,
              labels = labels,
                right=FALSE)
  intervals = levels(x_cut)
  mc = (L[1]+L[2])/2+A*(0:(k-1))
  Fr.abs = as.vector(table(x_cut)) 
  Fr.rel = round(Fr.abs/length(x),4) 
  Fr.cum.abs = cumsum(Fr.abs) 
  Fr.cum.rel = cumsum(Fr.rel)
  tabla = data.frame(intervals, mc, Fr.abs, Fr.cum.abs, Fr.rel, Fr.cum.rel)
  tabla
}

TablaFrecs(1e6, k= 27, A = 3646296, p= 0.1)

             intervals       mc Fr.abs Fr.cum.abs Fr.rel Fr.cum.rel
1   [999999.9,4646296)  2823148      1          1      1          1
2    [4646296,8292592)  6469444      0          1      0          1
3   [8292592,11938888) 10115740      0          1      0          1
...

【讨论】：