Rで解析:プロット軸の装飾がラクラク「magicaxis」パッケージ


plotコマンドで出力した図の軸をラクラクに装飾できる「magicaxisパッケージ」を紹介します。Rの「グラフィックスパラメータ」で発展的な図を作成できますが、慣れないとなかなか難しいものです。magicaxisパッケージでは直感的に軸の装飾などの作業ができます。ぜひ、試してみてください。

グラフィックスパラメータの概要に興味がある方は下記の記事がオススメです。
頻度が高い?20のグラフィックスパラメータのまとめ

パッケージのバージョンは1.9.5です。実行コマンドはwindows 7およびOS X 10.11.2のR version 3.2.3で確認しています。

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

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

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

実行コマンドの紹介

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

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

###データ例の作成#####
TestData <- data.frame(Group = paste0("TEST", 1:100), Data1 = sample(1:500, 100), Data2 = sample(200:300, 100)) #### #軸の体裁を調整する:magaxisコマンド #軸の調整;sideオプション:1 = bottom, 2 = left, 3 = top, 4 = right #主メモリの分割設定;majorn, 長さ;tcl #副メモリの分割設定;minorn, 長さ;ratio #軸を低10のlogに変換;unlogオプション:"x", "y", "xy" or "yx" or "Auto" #各軸名ラベルの距離;mtline #軸ラベルをべき乗表示;crunch: TRUE of FALSE #目盛間隔を指定;prettybase #macでの日本語文字化け防止 #par(family = "HiraKakuProN-W3") #ベースとなる図をプロット plot(TestData[, 2], TestData[, 2], pch = 19, col = "#4b61ba", cex = 1.5, axes = FALSE, xlab = "", ylab = "") #軸をプロット magaxis(side = c(1, 2, 4), majorn = 3, minorn = 3, tcl = 0.7, ratio = 1.8, labels = TRUE, unlog = "Auto", mgp = c(2, 0.5, 0), mtline = 2, xlab = "テスト", ylab = "test", crunch = TRUE, prettybase = 50, family = "HiraKakuProN-W3", col = "#a87963", col.axis = "red", lwd = 3) #### #バーラベルを図に追加:magbarコマンド #ラベルメモリの間隔変更:labNオプション #向きとサイズの変更:orientとscaleオプション #macでの日本語文字化け防止 par(family = "HiraKakuProN-W3") #ベースとなる図をプロット plot(TestData[, 2], TestData[, 2], type = "n", axes = FALSE, xlab = "", ylab = "") box() #色を設定 ColBar <- colorRampPalette(c("#deb7a0", "#e1e6ea", "#ffdd99")) #バーラベルをプロット magbar("top", title = "普通", titleshift = 0.8, col = ColBar(100)) #メモリ間隔を変更 magbar("right", title = "メモリの間隔変更", labN = 3, titleshift = 0.8, col = ColBar(100)) #向きを変更 magbar("topleft", orient = "h", title = "向き・サイズ", titleshift = 1, col = ColBar(100), scale = c(0.2, 0.5)) #### #データ分布をヒートマップで表示:magconコマンド #色の設定 ColBar <- colorRampPalette(c("#deb7a0", "#e1e6ea", "#ffdd99")) #プロット magcon(TestData[, 2], TestData[, 2], imcol = ColBar(100), barposition = "bottomright") [/code]

出力例

・magaxisコマンド
magaxis
・magbarコマンド
magbar
・magconコマンド
magcon


少しでも、あなたのウェブや実験の解析が楽になりますように!!

スポンサードリンク

スポンサードリンク