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"出力例
・arrowlocatorコマンド
少しでも、あなたの解析が楽になりますように！！
