ベクトル化コード：乗算

次のコードは、従来の C や Fortran のような書き方になっています。乗算のベクトル化を使わず、for ループを使っています。

x <- rnorm(10)
x2 <- numeric(length(x))
for(i in 1:10)
    x2[i] <- x[i] * x[i]

このコードをベクトル化して、より「R らしい」書き方に直してください。x はすでに用意されています。

上のサンプルコードを読み、何を計算しているか理解しましょう。
それをベクトル化した解法で書き直してください。ヒント：
- 解答は1行で書きます。
- for ループは使いません。
- 乗算演算子はベクトル化されています！