8. Function return value

fruits <- function(value){
  x <- sprintf("Fruits(s): %s", value)
  return(x)
}

fruits("Bananas")

## [1] "Fruits(s): Bananas"

superMarket <- function(){
  foods <- c(x = "Fish", y= "Meat", z = "Eggs", k = "Milk")
}

supmar = superMarket()
print(supmar)

##      x      y      z      k 
## "Fish" "Meat" "Eggs" "Milk"