R: избегая циклов при вставке записей в матрицу

Question

У меня есть матрица m нулей и кадр данных df, содержащий записи, которые я хочу вставить в m.

# fix seed ------------------------------------------- 
set.seed(0)  

# create m, matrix of zeros -------------------------- 
rnames <- seq(1, 100, 1) 
m <- matrix(0, length(rnames), length(letters), 
     dimnames=list(rnames, letters)) 

# create df of random records ------------------------ 
r <- sample(rnames, 10, replace=TRUE) 
c <- sample(letters, 10, replace=TRUE) 
q <- runif(10, -10, 10) 
df <- data.frame(r, c, q) 

# want to insert df$q at r,c in m -------------------- 

Могу ли я сделать это, не прибегая к петле? Какой самый чистый подход?

Answer 1

Передайте матрицу указателей в m.

index <- cbind(
    row = df$r, 
    col = match(df$c, colnames(m))  
) 

m[index] <- df$q