将向量的所有元素乘以R中for循环中的每个元素

我有一个要乘标量的向量（x）。我希望将整个x向量乘以每个标量值。

这是我想要的结果的一个示例：

 x <- c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)

 scalar <- c(1.2, 1.4, 1.6, 1,7, 1.8, 1.9, 2.0)

 x times 1.2 <- c(1.2, 2.4, 3.6, 4.8, 6, 7.2, 8.4, 9.6, 10.8, 12)

我的最终结果应该是7个新的向量/列，其中包含x * 1.2的每个元素，x * 1.4的每个元素，依此类推。

我尝试使用以下内容：

 for(i in seq(from=1, to=2, by=0.2))

     score <- x * i

但这只会将x元素乘以2.0。

欢迎提供有关如何完成此操作的任何建议。