Input data :
df1 <- data.frame(Category = c("a","b","c"),
Col1 = c(0.1,0.25,0.03),
Col2 = c(0.5,0.73,0.55),
Col3 = c(0.043,0.66,0.07))
df2 <- data.frame(Category = c("a","a","a","b","b","c","c","c","b"),
Col1 = c(1,2,3,4,5,6,7,8,9),
Col2 = c(9,8,7,6,5,4,3,2,1),
Col3 = c(5,6,7,8,9,4,3,2,1))
Both the data frames need to be multiplied to get the following result: