R で日次データを月次および年次データに集計する方法
R で日次データを週次、月次、または年次データに集計したい場合があります。
このチュートリアルでは、 lubridateパッケージとdplyrパッケージを使用してこれを簡単に行う方法を説明します。
例: 毎日のデータを R に集計する
R に、連続 100 日間にわたる商品の毎日の売上を示す次のデータ フレームがあるとします。
#make this example reproducible set.seed(1) #create data frame df <- data.frame(date = as.Date (" 2020-12-01 ") + 0:99, sales = runif (100, 20, 50)) #view first six rows head(df) dirty date 1 2020-12-01 27.96526 2 2020-12-02 31.16372 3 2020-12-03 37.18560 4 2020-12-04 47.24623 5 2020-12-05 26.05046 6 2020-12-06 46.95169
このデータを集計するには、次の構文を使用するlubridateパッケージのFloor_date()関数を使用できます。
floor_date (x, unit)
金:
- x:日付オブジェクトのベクトル。
- 単位:四捨五入する時間の単位。オプションには、秒、分、時間、日、週、月、隔月、四半期、半年、年が含まれます。
次のコード スニペットは、この関数をdplyrパッケージのgroup_by()およびsummary()関数とともに使用して、週、月、および年ごとの平均売上を見つける方法を示しています。
週あたりの平均売上高
library (lubridate)
library (dplyr)
#round dates down to week
df$week <- floor_date (df$date, " week ")
#find average sales per week
df %>%
group_by (week) %>%
summarize (mean = mean (sales))
# A tibble: 15 x 2
week means
1 2020-11-29 33.9
2 2020-12-06 35.3
3 2020-12-13 39.0
4 2020-12-20 34.4
5 2020-12-27 33.6
6 2021-01-03 35.9
7 2021-01-10 37.8
8 2021-01-17 36.8
9 2021-01-24 32.8
10 2021-01-31 33.9
11 2021-02-07 34.1
12 2021-02-14 41.6
13 2021-02-21 31.8
14 2021-02-28 35.2
15 2021-03-07 37.1
月平均売上高
library (lubridate)
library (dplyr)
#round dates down to week
df$month <- floor_date (df$date, " month ")
#find average sales by month
df %>%
group_by (month) %>%
summarize (mean = mean (sales))
# A tibble: 4 x 2
month mean
1 2020-12-01 35.3
2 2021-01-01 35.6
3 2021-02-01 35.2
4 2021-03-01 37.0
年間平均売上高
library (lubridate)
library (dplyr)
#round dates down to week
df$year <- floor_date (df$date, " year ")
#find average sales by month
df %>%
group_by (year) %>%
summarize (mean = mean (sales))
# A tibble: 2 x 2
year means
1 2020-01-01 35.3
2 2021-01-01 35.7
平均値による集計を選択していますが、中央値、最頻値、最大値、最小値など、必要な任意の要約統計量を使用できることに注意してください。
追加リソース
次のチュートリアルでは、R で他の一般的なタスクを実行する方法について説明します。