시작하기무료로 시작하기

좋아요 수 세기

RStudio Conf 데이터셋을 계속 살펴보겠어요. 이 데이터셋은 5000개가 넘는 하위 리스트로 이뤄져 있고, 각 하위 리스트는 #RStudioConf 해시태그가 포함된 트윗 하나를 담고 있어요.

이번 연습에서는 리트윗이 아닌 트윗에 대한 통계를 하나 뽑아 보려고 해요: 좋아요 수의 평균이에요. 각 하위 리스트에 들어 있는 "favorite_count" 요소는 해당 트윗을 ‘좋아요’한 사람의 수를 뜻해요.

purrr는 이미 로드되어 있고, rstudioconf 데이터셋도 작업 공간에 준비되어 있어요.

이 연습은 강의의 일부입니다

purrr로 배우는 중급 함수형 프로그래밍

강의 보기

연습 안내

  • mean()과 round() 함수에 각각 na.rm = TRUE와 digits = 1을 미리 채워 넣으세요.

  • 이렇게 미리 채운 두 함수를 조합해 새로운 함수 rounded_mean()을 만드세요.

  • 리트윗이 아닌 트윗만 모은 하위 리스트를 만드세요.

  • 각 하위 리스트에서 정수용 map_* 변형을 사용해 "favorite_count" 요소를 추출하고, 그 결과를 rounded_mean()에 전달하세요.

실습형 인터랙티브 연습

이 예제를 이 샘플 코드를 완성하여 풀어보세요.

# Prefill mean() with na.rm, and round() with digits = 1
mean_na_rm <- ___(___, ___)
round_one <- ___(___, ___)

# Compose a rounded_mean function
rounded_mean <- ___(___, ___)

# Extract the non retweet  
non_rt <- ___(___, "is_retweet")

# Extract "favorite_count", and pass it to rounded_mean()
non_rt %>%
  map_dbl("___") %>%
  ___()
코드 편집 및 실행