Rで出張解析:文字列の置き換えなどのコマンドの紹介

空白を含む文字数のカウント、空白の削除、文字列の置き換え、文字列の切り出しに関するコマンドです。

#文字列の例、半角空白含めて16文字

# KARADANI EMONO

Test <- " KARADANI EMONO "

#文字数を確認

nchar(Test)

[1] 16

#半角空白を全て除く

gsub(" ", "", Test)

[1] "KARADANIEMONO"

#先頭の半角空白を除く

gsub("^ ", "", " KARADANI EMONO ")

[1] "KARADANI EMONO "

#最後尾の半角空白を除く

gsub(" $", "", " KARADANI EMONO ")

[1] " KARADANI EMONO"

#文字列から一部を取り出す

#4から11文字までを取り出す

substring(Test, 4, 11)

[1] "RADANI E"

#文字列の5と6文字目をXXに置き換える

substring(Test, 5, 6) <- "XX"

#置換前

[1] " KARADANI EMONO "

#置換後

Test

[1] " KARXXANI EMONO "

#空白を含む文字列を指定の長さで切り出す

strtrim(Test, 9)

[1] " KARADANI"

#文字を指定した内容で分割

#文字Aで分割

#指定した文字は消えてしまします

#結果はlistなのでunlistでベクトルにしています。

unlist(strsplit(Test, "A"))

[1] " K" "R" "D" "NI EMONO "