시험 직전 요약장

apply()는 행렬·배열의 행 또는 열 방향 계산에, lapply()는 리스트 형태 결과에, sapply()는 가능한 경우 결과를 단순화할 때 자주 사용한다.

m <- matrix(1:6, nrow = 2, byrow = TRUE)
m
#      [,1] [,2] [,3]
# [1,]    1    2    3
# [2,]    4    5    6

apply(m, 1, sum)
# [1]  6 15

apply(m, 2, mean)
# [1] 2.5 3.5 4.5

lapply(list(1:3, 4:5), length)은 길이 2의 리스트를 반환하고, sapply(list(1:3, 4:5), length)은 가능한 경우 c(3, 2) 같은 벡터로 단순화한다.

apply()를 data.frame에 쓰면 내부적으로 행렬로 강제 변환될 수 있다. 서로 다른 자료형이 섞여 있으면 공통 자료형으로 맞춰지므로, 숫자 열과 문자 열이 함께 있으면 전체가 character 행렬이 될 수 있다.

d <- data.frame(
  a = 1:2,
  b = c("x", "y")
)
apply(d, 1, paste, collapse = "-")
# [1] "1-x" "2-y"

따라서 혼합형 데이터프레임에서 apply()를 사용할 때는 계산 전 변환될 자료형을 먼저 확인한다.