R语言求助，50论坛币献上。

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

请教群里对R语言比较熟悉的朋友。我遇到一个问题，我给不同“国家”编了码，由于共有200多个国家（或地区），故编码最大是三位数。现在的问题是，想让个位数前面显示两个0，两位数前面显示一个0. 例如，阿富汗的编码为1，安哥拉的编码为7，澳大利亚的编码为13，也门编码为239，津巴布韦241。我现在想让上述几个国家的编码分别显示为：001  007  013 239 241.
请问如何实现？注：已经有现在的rdata格式的数据，想在R中将国家代码的显示改变为三位数。希望对R比较熟悉的朋友出招，不胜感激。为表示谢意，可赠送50论坛币（发图片让我购买，价格设置为50论坛币）。

示例：

国家                代码1      代码2
阿富汗                    1        001
安哥拉                    7        007
澳大利亚               13        013
也门                    239        239
津巴布韦             241         241

我的国家代码现在是“代码1”这个样子的，希望变成“代码2”的样子。

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：50论坛币 0论坛币 论坛币 R语言 Rdata格式

R语言新手帮顶。可不可以改字符型呢

1. d<-data.frame(b=1:10)
   
2. d$e[nchar(d$b)==1]<-paste('00',d[nchar(d$b)==1,'b'],sep='')
   
3. d$e[nchar(d$b)==2]<-paste('0',d[nchar(d$b)==1,'b'],sep='')

复制代码

d<-data.frame(b=1:10)
d$e[nchar(d$e[nchar(d$b)==1]<-paste('00',d[nchar(d$b)==1,'b'],sep='')
d$e[nchar(d$e[nchar(d$b)==2]<-paste('0',d[nchar(d$b)==1,'b'],sep='')