学习目标

我们所采用的学习内容来自B站的Lizongzhang老师的R语言的学习分享以及R语言数据分析从入门到进阶
今天学习的主要内容是关于
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,区间为2print(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:4i<-1while(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:aug1ans2<-prod(ans1)#求阶乘的一个操作函数return(ans2)
}
f1(14)

运行结果如下:

> f1(14)
[1] 87178291200

f2<-function(a,b=3){ans3<-a+breturn(ans3)
}
f2(45)
f2(45,6)

运行结果如下

> f2(45)
[1] 48
> f2(45,6)
[1] 51

这里大家注意f2(45)和f2(45,6)的结果的不同

内容小结

这部分的内容还是相对来说比较简单的,大家做个简单了解就好

R语言的for循环等简单运用相关推荐

R语言使用for循环绘制多个模型的DCA（Decision Curve Analysis）曲线并保存特定分辨率的DCA曲线的结果文件
R语言使用for循环绘制多个模型的DCA(Decision Curve Analysis)曲线并保存特定分辨率的DCA曲线的结果文件目录
R语言使用for循环嵌套ggplot2可视化输出多个可视化结果实战
R语言使用for循环嵌套ggplot2可视化输出多个可视化结果实战目录 R语言使用for循环嵌套ggplot2可视化输出多个可视化结果实战
R语言使用lm函数构建简单线性回归模型（建立线性回归模型）、拟合回归直线、使用attributes函数查看线性回归模型的属性信息、获取模型拟合对应的残差值residuals
R语言使用lm函数构建简单线性回归模型(建立线性回归模型).拟合回归直线.使用attributes函数查看线性回归模型的属性信息.获取模型拟合对应的残差值residuals 目录
R语言使用lm函数构建简单线性回归模型（建立线性回归模型）、拟合回归直线、可视化散点图并添加简单线性回归直线、添加模型拟合值数据点、添加拟合值点和实际数据点之间的线段表示残差大小、col参数自定义设置
R语言使用lm函数构建简单线性回归模型(建立线性回归模型).拟合回归直线.可视化散点图并添加简单线性回归直线.添加模型拟合值数据点.添加拟合
R语言使用lm函数构建简单线性回归模型（建立线性回归模型）、拟合回归直线、使用residuls函数从模型中提取每个样本点的残差值、可视化残差与拟合值之间的散点图来看残差的分布模式
R语言使用lm函数构建简单线性回归模型(建立线性回归模型).拟合回归直线.使用residuls函数从模型中提取每个样本点的残差值.可视化残差与拟合值之间的散点图来看残差的分布模式目录
R语言提取PDF表格数据#简单！！！
R语言提取PDF表格数据#简单!!! #需要用到pdftables包以及api号,api需要从https://pdftables.com网站注册申请api,一般申请后可以免费转50页pdf insta ...
R语言使用lm函数构建简单线性回归模型（建立线性回归模型）、拟合回归直线、使用residuls函数从模型中提取每个样本点的残差值、计算残差和和残差平方和
R语言使用lm函数构建简单线性回归模型(建立线性回归模型).拟合回归直线.使用residuls函数从模型中提取每个样本点的残差值.计算残差和和残差平方和目录
关于R语言在for循环中保存图片失败的问题
发布于2021年10月25日今天下午使用R语言的for循环,对多组数据分析并保存结果图片时遇到一个问题,保存的图片文件无法打开,大小也不对. 看到网上有个解决方法 png(file="GO ...
R语言使用lm函数构建简单线性回归模型（建立线性回归模型）、拟合回归直线、可视化散点图并添加简单线性回归直线、添加模型拟合值数据点、自定义pch参数设置数据点形式
R语言使用lm函数构建简单线性回归模型(建立线性回归模型).拟合回归直线.可视化散点图并添加简单线性回归直线.添加模型拟合值数据点.自定义pch参数设置数据点形式目录

R语言的for循环等简单运用

文章目录

学习目标

学习内容

循环语句

for循环

while循环

条件语句

函数构架

内容小结

R语言的for循环等简单运用相关推荐

最新文章

热门文章