가장 평균 급여를 받는 직원

Excel BI의 Excel Challenge #322 — R로 해결하기 문제 정의 우리는 직원 목록과 그들의 급여를 가지고 있다. 급여가 평균에 가장 근접한 직원 3명을 찾아라. 전략 전체 급여 평균을 계산한다. 각 직원 급여와 평균과의 차이(절대값)를 구한다. 차이가 가장 작은 순서대로 정렬하고 상위 3명을 선택한다. R 코드 예시 # 데이터프레임 생성 employees <- data.frame( name = c("Alice", "Bob", "Charlie", "David", "Eve"), salary = c(65000, 70000, 72000, 68000, 71000) ) # 평균 급여 계산 avg_salary <- mean(employees$salary) # 평균과의 차이 계산(절대값) employees$diff <- abs(employees$salary - avg_salary) # 차이 기준으로 정렬 후 상위 3명 top3 <- employees[order(employees$diff), ][1:3, ] # 결과 출력 print(top3) 결과 예시 이 코드는 급여가 평균에 가장 근접한 3명의 이름과 급여, 그리고 평균과의 차이를 보여준다. Tip 데이터가 큰 경우 dplyr 패키지의 arrange와 slice_head를 활용하면 코드가 더 간결해진다. 정밀도를 높이려면 round 함수를 사용해 평균을 소수점 이하 몇 자리까지 반올림할 수 있다. 참고 링크 R 공식 홈페이지 Tidyverse 문서