# R program to illustrate
# pmin() function
  
# First example vector
x1 <- c(2, 9, 5, 7, 1, 8)  
   
# Second example vector            
x2 <- c(0, 7, 2, 3, 9, 6)  
  
# Application of pmin() in R
pmin(x1, x2)                               

[1] 0  7 2 3 1 6

# R program to illustrate
# pmax() function
  
# First example vector
x1 <- c(2, 9, 5, 7, 1, 8)  
   
# Second example vector            
x2 <- c(0, 7, 2, 3, 9, 6)  
  
# Application of pmax() in R
pmax(x1, x2)                                                              

[1] 2 9 5 7 9 8