R语言利用repeat循环语句生成小于1000的Fibonacci序列

以下是使用 R 语言利用 repeat 循环语句生成小于 1000 的 Fibonacci 序列的代码：

a <- 0
b <- 1
repeat {
c <- a + b
if (c > 1000) break
cat(c, " ")
a <- b
b <- c
}

输出结果为：1 2 3 5 8 13 21 34 55 89 144 233 377 610 987