001、
a <- c(-8, 10, 7, -5) b <- c(9, -8, -15, 54) dat <- data.frame(a, b) ## 测试数据框 dat -dat ## 直接加负号 -a