一、函式構造器
每一個R函式都包括三個部分：函式名，程式主體以及引數集合，在編寫自定義R函式時，需要將三個部分各自儲存在一個R物件中。這裡需要使用function函式，形如：
my_function<-function(){}
function函式可以將大括號內的程式碼內容構建成一個函式，例如：

roll<-function(){
  dice<-sample(1:6,2,replace = T)#可重複抽樣
  sum(dice)
}
roll()

函式將返回最後一行的執行輸出結果，如果最後一行不輸出結果，整個函式也將不會有返回值

二、含參函式的構造
可以通過在括號裡填入引數名稱加以實現，具體如下：

roll2<-function(bones){
  dice<-sample(bones,2,replace = T)#可重複抽樣
  sum(dice)
}
> roll2()
Error in sample(bones, 2, replace = T) : 
  argument "bones" is missing, with no default
> roll2(1:10)
[1] 11

可以發現如果不寫引數，R將報錯，為了防止類似的錯誤發生，可以預先設定一個初始預設值給bones引數，只需在括號裡用等號將預設值與引數相連即可。，形如：

roll3<-function(bones=1
 
:6){
  dice<-sample(bones,2,replace = T)#可重複抽樣
  sum(dice)
}
> roll3()
[1] 9

三、提取函式
就像其他語言的IDE一樣，RStudio也提供了抽取函式的功能，在R指令碼中選中對應的程式碼段，在選單欄中選擇Code>Extract Function即可。RStudio會詢問給函式取什麼名字，然後用function將所需函式包裝起來，並會自動檢查程式碼段中未定義的變數，將其設定為該函式的引數。
提取函式之後，同志們記得檢查一下，主要是看看有沒有什麼需要設定預設值的引數，或者函式有沒有返回值之類的問題。

四、檢視函式
不僅可以通過help檢視函式解釋，還可以通過直接輸入函式名檢視函式程式碼
這就是開源的好處哦~