Rで解析：コンソールでデータフレームを色々表示「colorDF」パッケージ

Rのコンソールにデータフレームをカラーで表示するパッケージの紹介です。データを要約し表示、表示する列の設定や条件に合うデータをハイライト表示することが可能です。

パッケージバージョンは0.1.4。実行コマンドはwindows 11のR version 4.1.3で確認しています。

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

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

#&#12497;&#12483;&#12465;&#12540;&#12472;&#12398;&#12452;&#12531;&#12473;&#12488;&#12540;&#12523;
install.packages("colorDF")

実行コマンド

詳細はコメント、パッケージのヘルプを確認してください。

#&#12497;&#12483;&#12465;&#12540;&#12472;&#12398;&#35501;&#12415;&#36796;&#12415;
library("colorDF")

###&#12487;&#12540;&#12479;&#20363;&#12398;&#20316;&#25104;#####
#tidyverse&#12497;&#12483;&#12465;&#12540;&#12472;&#12364;&#12394;&#12369;&#12428;&#12400;&#12452;&#12531;&#12473;&#12488;&#12540;&#12523;
if(!require("tidyverse", quietly = TRUE)){
  install.packages("tidyverse");require("tidyverse")
}
set.seed(1234)
n <- 50
TestData <- tibble(Group = sample(paste0("Group", 1:4), n,
                                  replace = TRUE),
                   X_num_Data = sample(c(1:50), n, replace = TRUE),
                   Y_num_Data = sample(c(51:100), n, replace = TRUE),
                   Chat_Data = sample(LETTERS[1:5], n, replace = TRUE))
########

#&#12467;&#12531;&#12477;&#12540;&#12523;&#12395;&#12487;&#12540;&#12479;&#12501;&#12524;&#12540;&#12512;&#12434;&#12459;&#12521;&#12540;&#34920;&#31034;:colorDF&#12467;&#12510;&#12531;&#12489;
ShowTest <- colorDF(x = TestData)
#&#30906;&#35469;
ShowTest

#&#34920;&#31034;&#12377;&#12427;&#21015;&#12398;&#35373;&#23450;:col_type&#12467;&#12510;&#12531;&#12489;
#&#21015;&#12398;&#25351;&#23450;:cols&#12458;&#12503;&#12471;&#12519;&#12531;;&#35373;&#23450;&#12391;&#12365;&#12427;&#20516;;
#"character","numeric","integer","factor",
#"identifier","pval","match","hidden"
col_type(ShowTest, cols = "Y_num_Data") <- "hidden"
#&#30906;&#35469;
ShowTest

#&#26465;&#20214;&#12395;&#21512;&#12358;&#21015;&#12434;&#12495;&#12452;&#12521;&#12452;&#12488;&#34920;&#31034;:highlight&#12467;&#12510;&#12531;&#12489;
#Chat_Data&#21015;&#12391;C&#12434;&#21547;&#12416;&#12434;&#12495;&#12452;&#12521;&#12452;&#12488;&#34920;&#31034;
ShowTest %>%
  highlight(.$Chat_Data == "C")

#&#26465;&#20214;&#12395;&#21512;&#12358;&#12487;&#12540;&#12479;&#12434;&#12495;&#12452;&#12521;&#12452;&#12488;&#34920;&#31034;:df_search&#12467;&#12510;&#12531;&#12489;
#2&#12434;&#21547;&#12416;&#12487;&#12540;&#12479;&#12434;&#12495;&#12452;&#12521;&#12452;&#12488;&#34920;&#31034;
ShowTest %>%
  df_search(pattern = 2)

#&#12467;&#12531;&#12477;&#12540;&#12523;&#12395;&#12487;&#12540;&#12479;&#12501;&#12524;&#12540;&#12512;&#12398;&#35201;&#32004;&#12434;&#34920;&#31034;:summary_colorDF&#12467;&#12510;&#12531;&#12489;
#&#25968;&#23383;&#12487;&#12540;&#12479;&#12398;&#35201;&#32004;&#20869;&#23481;:numformat&#12458;&#12503;&#12471;&#12519;&#12531;; "quantiles","mean","graphics"
colorDF(x = TestData) %>%
  summary_colorDF(numformat = "mean")

出力例

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