文章目录
- 学习目标
- 学习内容
- 循环语句
- for循环
- while循环
- 条件语句
- 函数构架
- 内容小结
学习目标
我们所采用的学习天学习的主要内容是关于for循环
学习内容
下面是学习的主要内容
循环语句
for循环
#for循环的使用
b<-numeric(5)
for(i in 1:5){
b[i]<-i^2
}
b
for (i in seq(0,10,2)) {
#0到10,区间为2
print(i)
}
运行结果如下:
> b
[1] 1 4 9 16 25
以及print(i)
,也就告诉了我们,seq函数的用法在这里是从0
到10
间隔为2进行取值
[1] 0
[1] 2
[1] 4
[1] 6
[1] 8
[1] 10
while循环
#while循环
v1<-1:4
i<-1
while(i<=length(v1)){
print(i)
print(sum(v1[1:i]))
i=i+1
#对i的值进行修改,不然会进入死循环
print(i)
print("----")
}
运行结果如下
[1] 1 # 这里是第一个print(i)
[1] 1 #这里表示的是 print(sum(v1[1:i])),因为第一层循环时1:1,#所以就只有第一个值
[1] 2 #这里是第二个print(i),表示这 i 值的变换
[1] "----" 下面类似
[1] 2
[1] 3
[1] 3
[1] "----"
[1] 3
[1] 6
[1] 4
[1] "----"
[1] 4
[1] 10
[1] 5
[1] "----"
while当中放入的是一个条件判断语句
df<-data.frame(c1=2:6,c2=7:11,c3=1:5)
nrow(df)
for(i in 1:nrow(df)){
print(sum(df[i,]))
}
这里注意到nrow()
意味着行的个数
运行结果如下
[1] 10
[1] 13
[1] 16
[1] 19
[1] 22
next
是退出该层循环,跳到下一层循环break
表示退出所有的循环,终止循环
条件语句
这部分过于简单,大家看一下代码就好
#条件结构
a<-5
if(a>6)
{
print("a>6")
}else if(a>3){
print("a>3")
}else{
print("a<=3")
}
运行结果如下
[1] "a>3"
R语言当中可以写出一句简短的代码,判断奇偶,运用到了ifelse()
语句
s<-45
ifelse(s%%2==0,"偶数","奇数")
运行结果如下
[1] "奇数"
ifelse
函数的帮助文档如下
ifelse(test, yes, no)
test表示的是测试判断的语句,yes表示如果判断为真则运行该结构,若判断为假,则运行no下的语句
函数构架
这一部分也比较简单,而且个人认为R语言可以调用的函数还是很多哒,大家简单了解一下就好
#函数的构建
f1<-function(aug1){
ans1<-1:aug1
ans2<-prod(ans1)#求阶乘的一个操作函数
return(ans2)
}
f1(14)
运行结果如下:
> f1(14)
[1] 87178291200
f2<-function(a,b=3){
ans3<-a+b
return(ans3)
}
f2(45)
f2(45,6)
运行结果如下
> f2(45)
[1] 48
> f2(45,6)
[1] 51
这里大家注意f2(45)和f2(45,6)的结果的不同
内容小结
这部分的内容还是相对来说比较简单的,大家做个简单了解就好