#user-defined function

fruits <- function(){
  print('Fruit(s)')
}

#calling a function
fruits()
## [1] "Fruit(s)"
fruits <- function(value){
  sprintf('Fruit(s): %s', value)
}

fruits('Bananas')
## [1] "Fruit(s): Bananas"