使用for循环计算

Question

我尝试用R中的“for”计算一个循环，但是我发现了相同的值，我不明白我错在哪里

s= exp(3.9847926338)
g= exp(0.0008496878/log(3.8867428919)) 
SQlisse2012=sum(Qlisse2012)
output <-matrix(unlist(Qlisse2012), nrow = 111, byrow = TRUE)

for(i in 1:111) {
     mak_x[i,1] <-1-s*g^((output[i,1]^i)*(SQlisse2012-1))
} 
mak_x

输出是1X1矩阵 所以应该是mak_x。 为什么我为所有mak_x获得相同的值。请有人帮帮我吗？ 谢谢。

> dput(head(unlist(Qlisse2012)))
c(0.00196369415769458, 0.000607220407674348, 8.90217045411847e-05, 
1.06625941681469e-05, 2.63131336125785e-05, 3.61959487783429e-05)