Это то, что вы ищете?
Nas <- matrix(0, ncol = 5, nrow = 2)
loc_x = c(1, 2, 3, 5)
Nas[1, loc_x] <- 1
Nas
#[,1] [,2] [,3] [,4] [,5]
#[1,] 1 1 1 0 1
#[2,] 0 0 0 0 0
Объяснение: Перед индексированием элементов Nas
мы инициализируем matrix
с data = 0
и ncol
и nrow
. Вам необходимо настроить значения ncol
и nrow
в соответствии с вашей конкретной ситуацией.
Если loc_x
является list
, вы можете использовать unlist
loc_x <- list(1, 2, 3, 5)
Nas[1, unlist(loc_x)] <- 1