相关疑难解决方法(0)

我有一组看起来像这样的数据:

anim <- c(25499,25500,25501,25502,25503,25504)
sex  <- c(1,2,2,1,2,1)
wt   <- c(0.8,1.2,1.0,2.0,1.8,1.4)
data <- data.frame(anim,sex,wt)

data
   anim sex  wt anim2
1 25499   1 0.8     2
2 25500   2 1.2     2
3 25501   2 1.0     2
4 25502   1 2.0     2
5 25503   2 1.8     2
6 25504   1 1.4     2

我希望在每个动物ID之前添加零:

data
   anim sex  wt anim2
1 025499   1 0.8     2
2 025500   2 1.2     2
3 025501   2 1.0     2
4 025502   1 2.0     2
5 025503   2 1.8     2
6 …

我看了但是没有找到如何在R中的字符串向量中的每个元素的末尾添加字符的答案,除了最后一个 ...

考虑以下:

data <- c("cat", "dog", "mouse", "lion")

我想在每个元素的末尾应用一个粘贴","的函数,结果是:

[1] "cat,", "dog,", "mouse,", "lion"

应用功能？for loop？任何帮助表示赞赏......

我有一个名称向量，如下所示：

x <- c("Marco", "John", "Jonathan")

我需要通过添加前导空格和尾随空格对其进行格式化，以便名称以 10 个字符的字符串居中：

> output
# [1] "  Marco   " "   John    " " Jonathan "

我希望有一个比paste,rep和 计数更简单的解决方案nchar？（也许可以，sprintf但我不知道如何）。