R语言数值字符0041，as.integer后成为41，怎么样可以保持0041格式的数值

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

R语言数值字符0041，as.integer后成为41，怎么样可以保持0041格式的数值？
如：0123  0124  0125  0126  0127  0128 0041 0001

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：Integer Inte R语言 GER 怎么样

string的格式不行吗？

只要显示0041？
你可以定义个S3类，继承integer，重载print方法：

1. > x=rpois(10,10)
   
2. > x
   
3. [1]  9 10 14 10  8  7  4 15  9  8
   
4. > attr(x,'class')='myint'
   
5. > x
   
6. [1]  9 10 14 10  8  7  4 15  9  8
   
7. attr(,"class")
   
8. [1] "myint"
   
9. > format.myint=function(x){sprintf('%04d',x)}
   
10. > format(x)
    
11. [1] "0009" "0010" "0014" "0010" "0008" "0007" "0004" "0015" "0009" "0008"
    
12. > print.myint <- function(x, ...) cat(format(x, ...), "\n"
    
13. + )
    
14. > x
    
15. 0009 0010 0014 0010 0008 0007 0004 0015 0009 0008
    
16. >

复制代码

马甲1号 发表于 2016-6-16 22:47
只要显示0041？
你可以定义个S3类，继承integer，重载print方法：

效果很好哦，大神！！！