- [R程序，用0，最大寬度墊字符數= 3

Question

我試圖墊向量的每一個元素用「0」，使得該最大寬度爲3

實施例：

• 0變爲000
• 12變成012
• 100保持100

下面是代碼

myvector <- c("2", "3", "33", "90", "120") 
newvector <- lapply(myvector,formatC(width=3, format="s", flag="0")) 

當我使用lapply，我得到錯誤

Error in formatC(width = 3, format = "s", flag = "0") : 
    argument "x" is missing, with no default 

，因爲我在lapply使用它這是沒有意義的，而且lapply第一個參數是myvector。

Answer 1

您需要將向量的每個元素傳遞給formatC（你還需要將它們作爲數字得到0填充）：

myvector <- c("2", "3", "33", "90", "120") 
newvector <- lapply(myvector, function(x) formatC(as.numeric(x), width=3, flag="0")) 
newvector 
# [[1]] 
# [1] "002" 
# 
# [[2]] 
# [1] "003" 
# 
# [[3]] 
# [1] "033" 
# 
# [[4]] 
# [1] "090" 
# 
# [[5]] 
# [1] "120" 

如果你想要一個向量而不是列表，您可以使用sapply而不是lapply。