Создать логический вектор заданных позиций для «ИСТИНА»

Question

Я хотел бы создать логический вектор заданного размера (скажем, 6) с индексами «ИСТИНА», которые задаются другим вектором: a=c(1,4) Желаемый результат:

T,F,F,T,F,F

Спасибо за советы.

Answer 1

Другой вариант с использованием tabulate

n <- 6
a <- c(1, 4)
as.logical(tabulate(a, n))
# [1]  TRUE FALSE FALSE  TRUE FALSE FALSE

Answer 2

Создайте логический вектор и затем назначьте нужные значения.

x <- logical(6)    # All FALSE
a <- c(1, 4)
x[a] <- TRUE

x
#[1]  TRUE FALSE FALSE  TRUE FALSE FALSE