子集和更改管道中的向量

Question

可复制的示例：

> foo <- rep("A",8) %>% .[c(2,4,8)] <- "D"
Error in rep("A", 8) %>% .[c(2, 4, 8)] <- "D" : 
  target of assignment expands to non-language object
> foo <- rep("A",8) %>% {.[c(2,4,8)] <- "D"}
> foo
[1] "D"

# Desired Result is a vector such as:
> A,D,A,D,A,A,A,D

上下文：我生成一个向量，并希望将元素的特定范围更改为空字符串。我尝试用括号括起来，但这似乎并没有执行我想要的行为。有什么建议么？ -我觉得我可能以错误的方式来处理这个问题...

我正在单个管道中尝试执行此操作，我可以在两行中使用一个子集来完成此操作，这是下面的答案之一，但是我认为这应该可以实现，并且我可能错过了一些相对简单的方法。