序列生成

我非常想问这个简单的问题，但我无法弄清楚。序列生成

我有一个变量

names <- c("M1", "K2L", "C2L", "N", "R_1_2", "CLA", "T123") # the real dataset has > 6000 valriables

我要加倍的名字，并添加字母“a”和“b”和输出（考虑顺序太）将如下所示：

M1a, M1b, K2La, K2Lb, C2La, C2Lb, Na, Nb, R_1_2a, R_1_2b, CLAa, CLAb, T123a, T123b

感谢您的帮助：

来源

2011-11-01 jon

使用rep与each参数重复每个名称。然后使用paste将它们与后缀结合使用。

paste(rep(names, each = 2), c("a", "b"), sep = "")

让我们再看看，在慢动作：

suffixes <- c("a", "b") # or letters[1:2] if you're feeling fancy 
n_suffixes <- length(suffixes) 
repeated_names <- rep(names, each = n_suffixes) 
final_names <- paste(repeated_names, suffixes, sep = "")

花式替代版本使用外产品：

as.vector(t(outer(names, suffixes, paste, sep = "")))

虽然我觉得这是更炫耀，因为它的可读性较差。

来源

2011-11-01 15:55:40

使用stringr包的另一解决方案

library(stringr) 
str_c(rep(names, each = 2), c('a', 'b'))

来源

2011-11-01 16:50:42 Ramnath

回答

相关问题