子集化和重命名向量元素

subsetting and renaming vector elements

我一定是犯了一些幼稚的错误,但无法弄清楚为什么我的代码没有按预期工作:

testVector<- c('a', 'a', 'a', 'b', 'b', 'b')

names(testVector)<- replicate(n = 6, expr = 'temp')

##The following does not work, but does not give any error:
names(testVector[testVector=='a'])<- replicate(n = 3, expr = 'tempA')
#
names(testVector[testVector=='a'])
# [1] "temp" "temp" "temp"

子集部分似乎是正确的,但我不明白为什么它不更改名称。我错过了什么?

您需要对 names

进行子集化
names(testVector)[testVector=='a'] <- replicate(n = 3, expr = 'tempA')

testVector
#tempA tempA tempA  temp  temp  temp 
#  "a"   "a"   "a"   "b"   "b"   "b"