如何在 R 的 vedtor 中将"0"转换为"00"？

Question

我有一个矢量

x <- c(0, 25, 0, 75, 50, 50, 0)

我想把它转换成0和只有0是双的，这样：

x <- c(00, 25, 00, 75, 50, 50, 00)

有人知道怎么做吗？

Answer 1

x <- c(0, 25, 0, 75, 50, 50, 0)
sprintf('%02.0f', x)
sprintf('%.2d', x)
sprintf('%02i', x)

所有输出是否相同

Answer 2

您没有指定格式，但可以这样做：

sprintf("%.2d", x)
# [1] "00" "25" "00" "75" "50" "50" "00"

但是，它们将采用字符格式。

Answer 3

使用str_pad

library(stringr)
str_pad(x, pad = '0', width = 2)
[1] "00" "25" "00" "75" "50" "50" "00"