сопоставить имена столбцов матрицы с числовыми именами векторов и сохранить значения в матрице в R

Question

Я пытаюсь сопоставить имена столбцов матрицы с именами числового вектора и сохранить значения числового вектора в матрице.

Например:

ex <-matrix(0,nrow=5, ncol= 2200)
colnames(ex) = paste("X",1:ncol(ex),sep="")
vec<- c(1:20)
names(vec) = c( "X13" , "X25", "X58", "X79", "X95" , "X118", "X212", "X311",    
"X422" , "X536", "X899", "X1005","X1080" , "X1118", "X1322", "X1516","X1705" 
, "X1890", "X1925", "X2008")

ВПриведенный выше код, я хочу, чтобы vec (числовой) был скопирован в ex (матрицу) путем сопоставления соответствующих имен столбцов.Я пытался, но я не получил решение, поскольку я все еще плохо знаком с R.

Answer 1

# loop through column name of matrix that have correspondences in your vector   
for(i in colnames(ex)[colnames(ex) %in% names(vec)]) {
  # fill these matrix columns with the designated values from your vector
  ex[ , i] <- vec[i]
}