【发布时间】:2018-08-04 01:26:56
【问题描述】:
我要取一个向量:
x <- c(rep("cat",3), rep("dog",2))
[1] "cat" "cat" "cat" "dog" "dog"
并把它变成:
[1] "cat_a" "cat_b" "cat_c" "dog_a" "dog_b"
每个唯一元素的索引都带有“_”加一个字母。
【问题讨论】:
我要取一个向量:
x <- c(rep("cat",3), rep("dog",2))
[1] "cat" "cat" "cat" "dog" "dog"
并把它变成:
[1] "cat_a" "cat_b" "cat_c" "dog_a" "dog_b"
每个唯一元素的索引都带有“_”加一个字母。
【问题讨论】:
使用你可以做的基本功能
ave(x, x, FUN=function(x) paste(x, letters[seq_along(x)], sep="_"))
# [1] "cat_a" "cat_b" "cat_c" "dog_a" "dog_b"
【讨论】: