Умножьте строки в R-кадре, сопоставив именованный числовой

Question

Как можно выборочно умножить строку в кадре данных на соответствующее число в именованном числе c?

## Create DataFrame
d <- data.frame(a=c(1,1,2), b=c(2,2,1), c=c(3,0,1))
rownames(d) = c("X", "Y", "Z")

## Create Named Numeric
named_numeric = c(2,1,3)
names(named_numeric) = c("X", "Y", "Z")
named_numeric

Все значения в первой строке кадра данных ("X": 1, 2,3) будет умножено на значение «X» в названной цифре c (2) в этом случае. Результатом первого ряда будет «Х»: 2,4,6.

expected_output = data.frame(a=c(2,1,6), b=c(4,2,3), c=c(6,0,3))
rownames(expected_output) = c("X", "Y", "Z")

Answer 1

Мы можем просто сделать

out <- d * named_numeric
identical(expected_output, out)
#[1] TRUE

, если имена named_numeric не выровнены с именами строк, затем изменить порядок одного из них и умножить

d * named_numeric[row.names(d)]