在R的基础包和扩展包中包含了很多强大的R函数。然而很多时候我们需要自己编写函数来实现特定的任务。

function_name<-function(arg,arg,...){expr}

function_name为函数名；arg为形参；expr为函数体。

2.1 编制一个函数计算 $1^3+2^3+3^3+\cdots+n^3$ .

输入：n

输出： $s=1^3+2^3+3^3+\cdots+n^3$

算法步骤：

funt<-function(n){
    s<-0
    for (i in 1:n) s<-s+i^3
    s#最后一行的量为输出值
   }
s<-funt(100)

运行上面的程序

> s
[1] 25502500

于是得到 $1^3+2^3+3^3+\cdots+100^3=25502500$ .

ITPub博客

R语言-自定义函数