Rで解析：txtファイルやsvgファイルなどの違いをHTML Widgetで確認「diffviewer」パッケージ

公開日 2024-06-15

Rの解析に役に立つ記事

テキスト(txt),データ(csv),画像(svg,png)ファイルの内容の違いをHTML Widgetで確認できるパッケージの紹介です。RStudioでの使用をおすすめします。

パッケージのバージョンは0.1.2。実行コマンドはRStudioのRStudio 2024.04.2+764

、windows 11のR version 4.3.3で確認しています。

＜おすすめのRに関する書籍です＞

超入門! Rでできるビジュアル統計学学会・論文発表に役立つデータ可視化マニュアル | 藤井亮輔, 鈴木康司

Amazonで藤井亮輔, 鈴木康司の超入門! Rでできるビジュアル統計学学会・論文発表に役立つデータ可視化マニュアル。アマゾンならポイント還元本が多数。

www.amazon.co.jp

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

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

# パッケージのインストール
install.packages("diffviewer")

コマンドの紹介

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

# パッケージの読み込み
library("diffviewer")

# テキスト(txt),データ(csv),画像(svg,png)ファイルの違いをHTML Widgetで確認:visual_diffコマンド
# 比較ファイルを指定:file_old/file_newオプション
visual_diff(file_old, file_new, width = NULL, height = NULL)

### 使用例 #####
## テキストファイルの比較
# 一時フォルダ（temporary folder）にファイルを作成
File_01 <- tempfile(fileext = ".txt")
File_02 <- tempfile(fileext = ".txt")

# 作成ファイルにテキストを書込み
writeLines(c("からだにいいもの", LETTERS[1:5]), File_01)
writeLines(c("からだによいもの", LETTERS[2:8]), File_02)

# ファイル内容を比較
visual_diff(File_01, File_02)
########

## svgファイルの比較
# Rで解析：サイズが小さいSVGファイルを作成「svglite」パッケージ
# https://www.karada-good.net/analyticsr/r-669/
# パッケージのインストール
install.packages("svglite")
# パッケージの読み込み
library("svglite")

# 一時フォルダ（temporary folder）にファイルを作成
SVG_File_01 <- tempfile(fileext = ".svg")
SVG_File_02 <- tempfile(fileext = ".svg")

# ファイルを作成
svglite(SVG_File_01);plot(x = 1:5, y = 4:8, xlim = c(1, 5));dev.off()
svglite(SVG_File_02);plot(x = c(1:3, 5, 6), y = 4:8,
                          xlim = c(1, 6), col = "blue");dev.off()

# ファイル内容を比較
visual_diff(SVG_File_01, SVG_File_02)
########