R语言基础 | for while 循环、if 条件、function自定义函数

循环（生成斐波那契数列为例）

for 循环

d[1] = 1
d[2] = 1
for(i in 3:20){
d[i] = d[i-1]+d[i-2]
print(d[i])}  

while 循环　　

e = rep(0, 10)

e[1] = 1
e[2] = 1
i = 3
while (i<=10){
e[i] = e[i-1] + e[i-2]
i=i+1
}
print(e)

　　

条件控制流

条件表达式　

　if(条件) 表达式
　if(条件1) 表达式1 else 表达式2
　if(条件1) 表达式1 else if (条件i) 表达式i…… else 表达式

f = c(1,2,3,4,5,1,2,6,11)
g = c()
for(i in 1:length(f))
# 条件语句
{
if(f[i]==1) g[i]="a"
else if(f[i]==2) g[i]="b"
else g[i]="c"
}

　　

 自定义函数

h = function(a=1,b=2)  # a, b 关键字参数
{x = seq(-1,1, 0.2)  # 生成等差数列
y = a*x + b
plot(x,y)}  # 画图
h()
h(3,4)