想請問了解R語言的大大們

我建立一個10列×5欄的data frame，想要新增第6欄是平均，是計算前5欄的平均值。

可是，我寫程式碼是不對的。想請大大們替我解惑。程式碼如下：

#建立一個矩陣，10列×5欄
viscosity = matrix(data =rnorm(50, mean = 10, sd = 1), ncol = 5)

#將矩陣轉換成Data frame
viscosity = data.frame(viscosity)

#新增第6欄，是計算前5欄的平均值
viscosity$average = mean(viscosity[,c(1:5)])

請大大們提點一下，怎麼寫這個計算平均值。

謝謝。