# R program to illustrate
# mapply() function
   
# Creating a list
A = list(c(1, 2, 3, 4))
   
# Creating another list
B = list(c(2, 5, 1, 6))
   
# Applying mapply()
result = mapply(sum, A, B)
print(result)

[1] 24

# R program to illustrate
# mapply() function
   
# Creating a list
A = list(c(1, 2, 3, 4))
   
# Creating another list
B = list(c(2, 5, 1, 6))
   
# Applying mapply()
result = mapply(prod, A, B)
print(result)

[1] 1440

Data1 <- c(1,2,3)
Data2 <- c(10,20,30)
mult_one<-function(Data1,Data2)
{
   Data1+Data2
}
mapply(mult_one,Data1,Data2)

11 22 33