在撰寫像這樣的回圈時，我可以將回圈中的值有效地存盤到向量中：
z = 0.5
x <- vector("numeric", 10)
for(i in 1:10){
x[i] <- z - i/10
}
>[1] 0.4 0.3 0.2 0.1 0.0 -0.1 -0.2 -0.3 -0.4 -0.5
但是，當我使用數字序列而不是冒號分隔符時：
z = 0.5
x <- vector("numeric", 20)
for(i in seq(0.05, 1, 0.05)){
x[i] <- z - i
}
>[1] -0.5 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0
它無法為 的每次迭代回傳一個向量i，為什么要這樣做以及如何使回圈有效地作業seq()？
uj5u.com熱心網友回復：
你的索引也變成了雙倍，這就是問題所在。您可以定義一個I帶有數字的向量，并在seq索引的uence 上回圈。子集兩者I，結果x用i。
z <- 0.5
x <- vector("numeric", 20)
I <- seq(0.05, 1, 0.05)
for (i in seq(I)) {
x[i] <- z - I[i]
}
x
# [1] 0.45 0.40 0.35 0.30 0.25 0.20 0.15 0.10 0.05
# [10] 0.00 -0.05 -0.10 -0.15 -0.20 -0.25 -0.30 -0.35 -0.40
# [19] -0.45 -0.50
以防萬一這不僅僅是某事的簡化示例，因為 R 是矢量化的，您也可以這樣做
z - seq(0.05, 1, 0.05)
# [1] 0.45 0.40 0.35 0.30 0.25 0.20 0.15 0.10 0.05
# [10] 0.00 -0.05 -0.10 -0.15 -0.20 -0.25 -0.30 -0.35 -0.40
# [19] -0.45 -0.50
轉載請註明出處，本文鏈接：https://www.uj5u.com/caozuo/399446.html