如何使用位置向量来创建二进制字符串？

Question

我有一个向量c(2, 5)，我希望将其转换为 n 元素的向量，其中位置2和5等于1，任何剩余位置等于零。< / p>

即。如果我想创建一个长度为6的向量，我想使用向量c(2, 5)生成以下向量：

c(0, 1, 0, 0, 1, 0)

Answer 1

怎么样

x <- c(2, 5)
n <- 6
replace(integer(n), x, 1L)
# [1] 0 1 0 0 1 0

另一种选择是

as.integer(1:n %in% x)
# [1] 0 1 0 0 1 0