আর ফাংশন

message <- function() {
  cat("হ্যালো বিশ্ব")
}

message()

message <- function() {
  return("হ্যালো বিশ্ব")
}

cat(message())

message <- function() {
  return("হ্যালো বিশ্ব")
}

cat(message())

message <- function() {
  cat("হ্যালো বিশ্ব")
}

message()

user <- function(name, land) {
  paste(name, land, sep = " - ")
}

cat(user("আরিফ", "বাংলাদেশ"))

user <- function(name, land) {
  cat(name, "-", land, "")
}

user("আরিফ", "বাংলাদেশ")

user <- function(name, land = "বাংলাদেশ") {
  cat(name, "-", land, "")
}

user("আরিফ")

sum_numbers <- function(...) {
  numbers <- c(...)
  return(sum(numbers))
}

print(sum_numbers(10, 15, 10, 25))

sum_numbers <- function(a, b, c, d) {
  return(a + b + c + d)
}

numbers <- c(10, 15, 10, 25)

print(do.call(sum_numbers, as.list(numbers)))

user <- function(name, land) {
  cat(name, "-", land, "")
}

user(name = "আরিফ", land = "বাংলাদেশ")

message <- function(text) {

  function() {
    text
  }
}

message <- message("হ্যালো বিশ্ব")

cat(message())

counter <- function(number) {

  if(number <= 0) {
    return(NULL)
  }

  cat("নাম্বার", number, "
")

  counter(number - 1)
}

counter(10)

outer <- function() {

  inner <- function() {
    return("হ্যালো বিশ্ব")
  }

  return(inner())
}

cat(outer())

message <- function() {
  return("হ্যালো বিশ্ব")
}

func <- message

cat(func())

message <- function(text) {
  return(text)
}

call <- function(callback) {
  cat(callback("হ্যালো বিশ্ব"))
}

call(message)