如何解决如何将“19”填充到字符串
我有以下数据集。
# A tibble: 30,560 x 3
fips year emp
<chr> <chr> <dbl>
1 01001 10 9828
2 01001 20 6261
3 01001 30 8172
4 01001 40 6752
5 01001 50 5957
6 01001 60 5818
7 01001 70 8118
8 01001 80 12433
9 01001 90 15432
10 01001 2000 22847
# … with 30,550 more rows
我想得到以下输出。
# A tibble: 30,560 x 3
fips year emp
<chr> <chr> <dbl>
1 01001 1910 9828
2 01001 1920 6261
3 01001 1930 8172
4 01001 1940 6752
5 01001 1950 5957
6 01001 1960 5818
7 01001 1970 8118
8 01001 1980 12433
9 01001 1990 15432
10 01001 2000 22847
# … with 30,550 more rows
为了得到这个数据集,我写了下面的代码。但这会非常乏味。我也尝试了 str_pad,但填充“19”不起作用。你能告诉我更聪明的方法吗?
emp %>%
mutate(year= ifelse(year == "00","1900",ifelse(year == "10","1910",ifelse(year == "20","1920",ifelse(year == "30","1930",ifelse(year == "40","1940",ifelse(year == "50","1950",ifelse(year == "60","1960",ifelse(year == "70","1970",ifelse(year == "80","1980",ifelse(year == "90","1990","2000")))))))))))
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。