1. 학습
    2. /
  2. 강의
    3. /
  3. 효율적인 R 코드 작성
Connected

연습 문제

행 합계 계산하기

두 번째로 발견된 병목은 행 합계를 계산하는 부분이었어요.

total <- apply(d, 1, sum)

이전 연습 문제에서 기본 객체를 행렬로 바꿨습니다. 덕분에 위의 apply 연산이 세 배가량 빨라졌어요. 하지만 더 최적화할 수 있는 방법이 하나 더 있어요. apply()를 rowSums()로 바꾸는 것입니다.

지침

100 XP
  • rowSums()를 사용해 r_sum() 함수를 완성하세요.
  • microbenchmark() 함수를 사용해 app()과 r_sum()의 실행 시간을 비교하세요.