محسن ابراهیمی www.mohsenebrahimy.ir
برای ساخت تابع باید به صورت زیر عمل کنیم.
name <- function(input) { # Do something return(output) }
jam <- function(x, y) { z <- x + y return(z) }
jam(2, 3)
[1] 5
class(jam)
[1] "function"
salam <- function(name) { salam_name <- paste("Salam", name, "aziz") return(salam_name) }
salam("Mohsen")
[1] "Salam Mohsen aziz"
salam <- function(name = "Mohsen") { salam_name <- sprintf("Salam %s Aziz", name) return(salam_name) }
salam()
[1] "Salam Mohsen Aziz"
salam(name = "Arash")
[1] "Salam Arash Aziz"