R语言实现打印闰年函数，实现递归函数返回从1到n的立方和，定义函数实现n被5整除

提示：文章写完后，目录可以自动生成，如何生成可参考右边的帮助文档

---

前言

R语言函数例题，实现函数n能被5整除，打印闰年，递归函数返回从1到n的立方和。

---

一、题目

1.实现一个函数，输入参数n，如果n能被5整除则返回“YES”，否则返回“NO”
2.分别使用repeat,while,for循环语句，打印从1950年到2022年中的闰年
3.写一个递归函数，传入参数n，返回从1到n的立方和

二、步骤

1.实现一个函数，输入参数n，如果n能被5整除则返回“YES”，否则返回“NO”

代码如下（示例）：

#定义函数demo1
demo1<-function(a){
  if(a%%5==0)
    return("YES")
  else
    return("NO")
}
#调用函数
demo1(99)
demo1(55)

2.分别使用repeat,while,for循环语句，打印从1950年到2022年中的闰年

代码如下（示例）：

#repeat
#设置起始年份i
i<-1950
repeat{
  if(i%%4==0)
    print(i)
  i<-i+1
  if(i>2022)  #设置终止年份
    break     #跳出循环
}

#while
i<-1950
while(i<2022){
  if(i%%4==0)
    print(i)
  i<-i+1
}

#for
for(i in 1950:2022){
  if(i%%4==0)
    print(i)
}

---

3.写一个递归函数，传入参数n，返回从1到n的立方和

代码如下（示例）：

#定义函数demo2
demo2<-function(b){
  if(b==1)
    return(1)
  else
    return(b*b*b+demo2(b-1))
}
demo2(88)
demo2(3)