Rで解析：カレンダー形式のヒートマップを作成「ggTimeSeries」

カレンダー形式のヒートマップを簡単に作成できるパッケージの紹介です。本パッケージはggplot2を基本としているので、ggplot2の操作コマンドを使用することができます。

また、カレンダー形式のヒートマップ以外にも水平方向へのエリアチャートを作成する「ggplot_horizon」、積み上げのエリアチャートを作成する「stat_steamgraph」、値の増減を示す「ggplot_waterfall」、値をドットで示す「stat_occurrence」のコマンドが収録されています。

この中から、値の増減を示す「ggplot_waterfall」コマンドを合わせて紹介します。他のコマンドはパッケージのヘルプを確認してください。

パッケージバージョンは1.0.1。実行コマンドはR version 4.2.2で確認しています。

パッケージのインストール

下記、コマンドを実行してください。

#パッケージのインストール
install.packages("devtools")
devtools::install_github("Ather-Energy/ggTimeSeries")

実行コマンド

詳細はコメント、パッケージのヘルプを確認してください。データは「data.table」パッケージで作成するのが手軽に利用するポイントです。

#&#12497;&#12483;&#12465;&#12540;&#12472;&#12398;&#35501;&#12415;&#36796;&#12415;
library("ggTimeSeries")
#install.packages("data.table")
library("data.table")
library("ggplot2")

###&#12487;&#12540;&#12479;&#20363;&#12398;&#20316;&#25104;#####
#&#38283;&#22987;&#26085;&#26376;&#24180;
StartDate <- "06/02/2016"
#&#32066;&#20102;&#26085;&#26376;&#24180;
EndDate <- "31/12/2017"
#&#37197;&#21015;&#12398;&#20316;&#25104;
DateVector <- seq(as.Date(StartDate, "%d/%m/%Y"),
                  as.Date(EndDate, "%d/%m/%Y"),
                  "days")
#&#20516;&#20184;&#12365;&#12398;data.frame&#12395;&#22793;&#25563;
TestData <- data.table(Date = DateVector,
                       data = runif(length(DateVector)))
########

#&#12459;&#12524;&#12531;&#12480;&#12540;&#24418;&#24335;&#12398;&#12498;&#12540;&#12488;&#12510;&#12483;&#12503;&#12434;&#20316;&#25104;:ggplot_calendar_heatmap&#12467;&#12510;&#12531;&#12489;
ggplot_calendar_heatmap(TestData, cDateColumnName = "Date",
                        cValueColumnName = "data", vcGroupingColumnNames = "Year") +
  labs(xlab = NULL, ylab = NULL) + 
  scale_fill_continuous(low = "#4b61ba", high = "#a87963") + 
  facet_wrap(~Year, ncol = 1)

###&#12487;&#12540;&#12479;&#20363;&#12398;&#20316;&#25104;#####
TestData2 <- data.frame(x = 1:100,
                        y = sample(1:50, 100, replace = TRUE))
########

#&#12487;&#12540;&#12479;&#12398;&#22679;&#28187;&#12434;&#25226;&#25569;waterfall&#12503;&#12525;&#12483;&#12488;:ggplot_waterfall&#12467;&#12510;&#12531;&#12489;
ggplot_waterfall(TestData2, "x", "y")

出力例

・ggplot_calendar_heatmapコマンド

・ggplot_waterfallコマンド

少しでも、あなたの解析が楽になりますように！！