Rで解析：Karl W Bromanさんの便利で雑多なコマンド集「broman」パッケージ

Karl W Bromanさんの便利で雑多なコマンド集です。例えば、数字3桁毎にカンマを付与、プロットに矢印をインタラクティブに追加する、指定ベクトルをカンマ、最後は指定文字で区切る、論理ベクトルを確認するなどのコマンドが多数収録されたパッケージの紹介です。

また、実行コマンドでは紹介しませんが、ベン図を作成する「venn」コマンド、Holmans triangleを作成する「triplot」コマンド、図にポイント「tripoints」、ライン「trilines」、矢印「triarrow」、テキスト「tritext」を追加するコマンドも収録されています。

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

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

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

install.packages("broman")

コマンドの紹介

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

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


# 数字3桁毎にカンマを付与:add_commasコマンド
add_commas(c(459, 8574, 58, 5, 1111111))
[1] "459" "8,574" "58" "5" "1,111,111"


# 2つのlist classを比較し構成を揃える:align_vectorsコマンド
align_vectors(x = list(Test = c(1:5), Test_3 = c(5:3)), 
              y = list(Test_2 = c(5:15)),
              expand = FALSE)


# プロットに矢印をインタラクティブに追加する:arrowlocatorコマンド
# 初回クリックを矢印の頭にする:reverseオプション;TRUE/FALSE
# 初回クリックを基準位置に水平に矢印を作成:horizontalオプション;TRUE/FALSE
# 初回クリックを基準位置に垂直に矢印を作成:verticalオプション;TRUE/FALSE
# 矢印の頭の線の長さを指定:lengthオプション;初期値_0.1
barplot(height = 1:5)
#boxplot(x = 1:5, y = 1:5)
#plot(x = 1:5, y = 1:5)
arrowlocator(col = "red", lwd = 5,
             reverse = TRUE,
             horizonta = FALSE,
             vertical = FALSE,
             length = 0.5)


# 2つのオブジェクト内容を比較しTRUE/FALSEで確認:cfコマンド
x <- c(5, 8, 9, NA, 3, NA)
y <- c(5, 2, 9, 4, NA, NA)
cf(x, y)
[1] TRUE FALSE TRUE FALSE FALSE TRUE


# gray((n:0)/n))のカラーパレットを作成:revgrayコマンド
image(matrix(1:10), col = revgray())


# rev(rainbow(start = 0, end = 2/3, ...))のカラーパレットを作成:revrainbowコマンド
image(matrix(1:10), col = revrainbow())


# 指定ベクトルをカンマ、最後は指定文字で区切る:vec2stringコマンド
# 最後の指定文字:conjunctionオプション
vec2string(letters[1:4], conjunction = "からだ")
[1] "a, b, c, からだ d"


# 論理ベクトルを確認:%nin%, %win%, %wnin%コマンド
vals <- c("a", "xa", "C", "A", "体") 
# 一致しないをTRUEで返す:%nin%コマンド
vals %nin% c(letters, "体")
[1] FALSE  TRUE  TRUE  TRUE FALSE

# 一致を値で返す:%win%コマンド
vals %win% c(letters, "体")
[1] "a"  "体"

# 一致しないを値で返す:%win%コマンド
vals %wnin% c(letters, "体")
[1] "xa" "C"  "A"