R语言中数字格式输出
2014-06-17 10:06阅读：
R语言中如何读取、输出各种表示形式的整数数字，包括：常用的十进制、八进制、十六进制、逗号分隔的英语数字，科学计数法表示的数字。
1、十进制
非常简单，不再赘述。
2、八进制
x<-9
#转化为八进制表示
y<-as.octmode(x)
#转换回十进制
z<-unclass(y)
3、十六进制
x<-17
#转化为八进制表示
y<-as.hexmo
de(x)
#转换回十进制
z<-unclass(y)
4、逗号分隔的英语数字
x<-123456
#以逗号分隔的形式表示
y<-prettyNum(x,big.mark=',')
#另外，包ggplot2提供了一个函数comma，可以直接转换
library(ggplot2)
y<-comma(x)
#由于转化后的y为字符串型，并且没有找到可以直接转化的方法，所以只能曲线救国，通过字符串函数来转换了。
z<-as.numeric(sub(',','',y))
5、科学计数法
x<-12345
#通过函数format实现
y<-format(x,scientific=TRUE)
#限定有效数字的个数
z<-format(x,scientific=TRUE,digit=3)
#转化为普通十进制表示方式，直接使用函数as.numeric即可。但是注意和原始的x值并不是相等的。
as.numeric(z)
此处只是举出了几种常用的整数的表示方法。如果有其他需求，请参考函数format、prettyNum等。
文章来自：
http://blog.sina.cn/dpool/blog/s/blog_6caea8bf0101156q.html?vt=4
文字上标下标输出
（http://cos.name/cn/topic/101498）
plot(1:5,1:5,type='n')
text(2,3,expression(N^15))
text(2,4,expression(phantom()^15*N))
#用phantom 占位置
text(2,5,expression(''^15*N),
col='red')
#用''占位置
plot(1:10,1:10,type='n')
text(2,10,expression(x++y))
text(2,9,expression(x+phantom()+y))
#‘魅影’用法
text(2,8,expression(x+phantom(0)+y))
text(6,9,expression(x+over(1,phantom(0))))
text(6,7,expression(x+over(1,phantom())))
text(6,5,expression(x+over(1,2)))
title(ylab=expression(CO[2]~~efflux~~delta~~phantom()^{13}*C~~('\u2030')),line=2.5)
