R语言科学计数法介绍:digits和scipen设置方式
控制R语言科学计算法显示有两个option： digitis和scipen。介绍的资料很少，而且有些是错误的。经过翻看R语言的帮助和做例子仔细琢磨，总结如下：
默认的设置是：
getOption("digits")
[1] 7
getOption("scipen")
[1] 0
digits 有效数字字符的个数，默认是7， 范围是[1,22]
scipen 科学计数显示的penalty，可以为正为负，默认是0
R输出数字时，使用普通数字表示的长度 <= 科学计数法表示的字符长度 + scipen长度时，保留普通数字表示的长度，否者采用科学计数法表示。
举个栗子：
> options(digits = 2) # 有效数字为2位 > options(scipen = 1) > 1 # 1e+00 长度为5， 保留1显示，长度为1 [1] 1 > 12345678 # 1.2e+07， 长度为7， 7 + scipen = 8， 普通数字表示长度为8， 没有超过8， 任然保留不同数字的表示。 [1] 12345678 > 123456789 # 1.2e+08, 长度为7， 7 + scipen =8， 普通数字表示长度为9，因此切换成科学计数法表示 [1] 1.2e+08
一个简单的方法（不那么准确，比如digits=1时，没有小数点；数非常大时，指数可能是3位数）估算最长的数字串可以这样：
digits + 1 (小数点）+ 4 (e+XX科学计数法表示) + scipen
比如刚才最长不用科学计数法表示的数字长度是2+1+4+1 = 8
我们看看修改scipen = -2, 验证是不是最长数字长度是2+1+4 - 2 = 5
> options(scipen = -2) > 1234 [1] 1234 > 12345 [1] 12345 > 123456 [1] 1.2e+05
果然！
补充：R语言设置数值输出（保留至小数点后位数和保留有效数字）
在R语言中，数字的输出默认为7位：
> a = 0.1234567890 #10位 > a [1] 0.1234568
注：输出结果四舍五入。
1 options(digits)函数
通过options(digits)函数设置输出长度，当digits = 3时：
> options(digits = 3) > a = 0.1234567890 #10位 > a [1] 0.123
当digits = 10时：
> options(digits = 10) > a = 0.1234567890 #10位 > a [1] 0.123456789
digits最大取22，超过22会报错：
> options(digits = 3) > options(digits = 22) > options(digits = 23) Error in options(digits = 23) : invalid 'digits' parameter, allowed 0...22
输出的结果只保留了9位，末尾的0被省略。
2 round(x, n)函数
round(x, n)函数中，x为数字，n为小数点后保留的位数，设置n = 4时：
> a = 0.1234567890 #10位 > round(a, 4) [1] 0.1235 > a = 1.234567890 #小数点后9位 > round(a, 4) [1] 1.2346
注：输出结果四舍五入。
当设置n = 10时：
> a = 0.1234567890 #10位 > round(a, 10) [1] 0.123456789
输出的结果只保留了9位，末尾的0被省略。
当小数点后的0的位数超过n时，输出的结果为0：
> a = 0.0001234567890 #13位 > round(a, 3) [1] 0 > a = 0.0001234567890 #13位 > round(a, 4) [1] 1e-04
3 signif(y, n)函数
signif(x, n)函数中，x为数字，n为有效数字的个数 ，当n = 4时：
> a = 1.234567890 #小数点后9位 > signif(a, 4) [1] 1.235 > a = 0.000001234567890 #小数点后15位 > signif(a, 4) [1] 1.235e-06
当n = 10时：
> a = 1.234567890 #小数点后9位 > signif(a, 10) [1] 1.23456789
此时数字末尾的0依旧被省略。
4 sprintf(fmt, …)函数
> a = 0.1234567890 #小数点后10位
> sprintf("%0.4f", a)
[1] "0.1235"
> a = 0.1234567890 #小数点后10位
> sprintf("%0.10f", a)
[1] "0.1234567890"
通过sprintf(fmt, ...)函数可以保留末尾的0。
当输入为整数时，位数不够会在输入值前面补0：
> a = 12456789
> sprintf("%03d", a)
[1] "12456789"
> a = 12
> sprintf("%03d", a)
[1] "012"
欢迎大家批评指正。
以上为个人经验，希望能给大家一个参考，也希望大家多多支持脚本之家。如有错误或未考虑完全的地方，望不吝赐教。
相关文章
在本篇内容里小编给大家整理的是一篇关于R语言线性回归知识点总结内容，有兴趣的朋友们可以跟着学习下。2021-05-05
在本篇内容里小编给大家整理的是一篇关于R语言箱线图创建实例讲解内容，有需要的朋友们可以学习下。2021-04-04
这篇文章主要介绍了R语言实现读取前n行数据的操作，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧2021-04-04
R语言实现将分类变量转换为哑变量(dummy vairable)
这篇文章主要介绍了R语言实现将分类变量转换为哑变量(dummy vairable)，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧2021-04-04
这篇文章主要为大家介绍了RcppEigen计算点乘与矩阵乘法时发生连乘计算错误的解决方式，有需要的朋友可以借鉴参考下，希望能够有所帮助2021-11-11
火山图作为散点图的一种，将统计测试中的统计显著性量度和变化幅度相结合，从而能够帮助快速直观地识别那些变化幅度较大且具有统计学意义的数据点。本文将为大家详细介绍如何利用R语言绘制火山图，需要的可以参考一下2022-03-03
这篇文章主要介绍了R语言基础统计方法图文实例讲解，文中图文合并讲解的很透彻，有感兴趣的同学可以研究下2021-03-03
R语言 install.packages 无法读取索引的解决方案
这篇文章主要介绍了R语言 install.packages 无法读取索引的解决方案，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧2021-04-04
这篇文章主要给大家介绍了关于R语言逻辑回归、ROC曲线与十折交叉验证的相关资料，文中通过示例代码介绍的非常详细，对大家的学习或者工作具有一定的参考学习价值，需要的朋友们下面随着小编来一起学习学习吧2021-03-03
这篇文章主要介绍了如何用R语言绘制饼图和条形图，帮助大家更好的理解和学习使用R语言，感兴趣的朋友可以了解下2021-03-03
最新评论