R语言科学计数法介绍:digits和scipen设置方式

这篇文章主要介绍了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语言科学计数法介绍:digits和scipen设置方式的详细内容,更多请关注0133技术站其它相关文章!

赞(0) 打赏
未经允许不得转载:0133技术站首页 » R语言