gpt4 book ai didi

r - 如何在向量中插入元素?

转载 作者:行者123 更新时间:2023-12-04 08:54:57 29 4
gpt4 key购买 nike

我有一个逻辑向量,我希望在特定索引处插入新元素。我在下面提出了一个笨拙的解决方案,但有没有更简洁的方法?

probes <- rep(TRUE, 15)
ind <- c(5, 10)
probes.2 <- logical(length(probes)+length(ind))
probes.ind <- ind + 1:length(ind)
probes.original <- (1:length(probes.2))[-probes.ind]
probes.2[probes.ind] <- FALSE
probes.2[probes.original] <- probes

print(probes)


[1] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE


print(probes.2)


[1]  TRUE  TRUE  TRUE  TRUE  TRUE FALSE  TRUE  TRUE  TRUE  TRUE  TRUE FALSE
[13] TRUE TRUE TRUE TRUE TRUE

所以它有效但看起来很丑 - 有什么建议吗?

最佳答案

你可以用索引做一些魔法:

首先创建具有输出值的向量:

probs <- rep(TRUE, 15)
ind <- c(5, 10)
val <- c( probs, rep(FALSE,length(ind)) )
# > val
# [1] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE
# [13] TRUE TRUE TRUE FALSE FALSE

现在把戏。每个旧元素获得秩,每个新元素获得半秩
id  <- c( seq_along(probs), ind+0.5 )
# > id
# [1] 1.0 2.0 3.0 4.0 5.0 6.0 7.0 8.0 9.0 10.0 11.0 12.0 13.0 14.0 15.0
# [16] 5.5 10.5

然后使用 order以正确的顺序排序:
val[order(id)]
# [1] TRUE TRUE TRUE TRUE TRUE FALSE TRUE TRUE TRUE TRUE TRUE FALSE
# [13] TRUE TRUE TRUE TRUE TRUE

关于r - 如何在向量中插入元素?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/1493969/

29 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com