R 최빈값 구하기

#최빈값 구하기1

##1000단위 반올림
##table 함수로 금액별 예약건수 구하기
##which.max 함수로 예약건수가 최대인 벡터 요소 구하기
##names함수로 예약건수가 최대인 벡터 요소의 속성 정보를 구하기

names(which.max(table(round(reserve_table$total_price,-3))))

#최빈값 구하기2

##table함수로 금액별 예약건수를 구한 벡터를 데이터 프레임으로 변환

as.data.frame(table(round(reserve_table$total_price,-3))) %>%

 

  ##예약건수인 Freq 컬럼으로 정렬 후 맨마지막 값 확인(1만원,2만원,4만원대가 58개로 공동1위임)

  arrange(Freq)

 

VAR1      Freq