1、
> a <- c(8, 2, 7, 3, 7) > a [1] 8 2 7 3 7 > b <- c(3, 7, 5, 5, 2) ## 测试向量 > b [1] 3 7 5 5 2 > pmin(a, b) ## 返回成对值中的较小值 [1] 3 2 5 3 2 > pmax(a, b) ## 返回成对值中的较大值 [1] 8 7 7 5 7