R语言中for循环和while循环求1-100的和
1、for循环
sum = 0
for (i in 1:100)
{
sum = sum + i
}
print(sum)
1-100内偶数的和
sum = 0
for (i in 1:100) {
if (i %% 2 == 0)
{
sum = sum + i
}
}
print(sum)
扩展:
a <- c(2,4,5,7)
b <- c(3,4,1,3)
c <- data.frame(a,b)
c
sum = 0
for (i in c$b) {
sum = sum + i
}
print(sum)
2、while循环
sum = 0
i = 100
while (i > 0) {
sum = sum + i
i = i - 1
}
print(sum)
sum = 0
i = 1
j = 100
while (i <= j) {
sum = sum + i
i = i + 1
}
print(sum)
求1-100内奇数的和
sum = 0
i = 100
while (i > 0) {
if (i %% 2 != 0)
{
sum = sum + i
}
i = i - 1
}
print(sum)
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步