位置ベクトルを使用してバイナリ文字列を作成する方法は？

Question

私はベクトルc(2, 5)を持っています。これをn要素のベクトルに変換したいと思います。位置2と5は1に等しく、残りの位置はゼロに等しくなります。

私は長さ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 

そして、別のオプションをis

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