[R言語]文字列(string)の特定の文字を置換するには？

どうも、ちょげ(@chogetarou)です。

文字列(string)の特定の文字を置換する方法を紹介します。

方法

文字列(string)の特定の文字を置換する方法は、4つあります。

gsub()

１つ目は、gsub()を使う方法です。

まず、gsub()を呼び出します。

gsub()の第１引数に置換する文字、第２引数に置換後の新しい文字を指定します。

そして、gsub()の第３引数に対象の文字列を指定します。

#text=対象の文字列, replace=置換する文字, new=置換後の新しい文字
result <- gsub(replace, new, text)

上記のgsub()は、文字列(string)の特定の文字を全て置換した結果を返します。

使用例

text <- "Hello,World"

result <- gsub("l", "*", text)

cat(result)

出力：
> cat(result)
He**o,Wor*d

sub()

２つ目は、sub()を使う方法です。

まず、sub()を呼び出します。

sub()の第１引数に置換する文字、第２引数に置換後の新しい文字を指定します。

そして、sub()の第３引数に対象の文字列を指定します。

#text=対象の文字列, replace=置換する文字, new=置換後の新しい文字
result <- sub(replace, new, text)

上記のsub()は、文字列(string)の特定の文字の内、先頭にある文字だけを置換した結果を返します。

使用例

text <- "Hello,World"

result <- sub("l", "*", text)

cat(result)

出力：
> cat(result)
He*lo,World

str_replace_all()

３つ目は、str_replace_all()を使う方法です。

まず、stringrパッケージを導入します。

library(stringr)

次に、str_replace_all()を呼び出します。

str_replace_all()の第１引数に対象の文字列を指定します。

そして、str_replace()の第２引数に置換する文字、第３引数に置換後の新しい文字を指定します。

#text=対象の文字列, replace=置換する文字, new=置換後の新しい文字
result <- str_replace_all(text, replace, new)

上記のstr_replace_all()は、文字列(string)の特定の文字を置換した結果を返します。

使用例

library(stringr)

text <- "Hello,World"

result <- str_replace_all(text, "l", "*")

cat(result)

出力：
> cat(result)
He**o,Wor*d

str_replace()

４つ目は、str_replace()を使う方法です。

まず、stringrパッケージを導入します。

library(stringr)

次に、str_replace()を呼び出します。

str_replace()の第１引数に対象の文字列を指定します。

そして、str_replace()の第２引数に置換する文字、第３引数に置換後の新しい文字を指定します。

#text=対象の文字列, replace=置換する文字, new=置換後の新しい文字
result <- str_replace(text, replace, new)

上記のstr_replace()は、文字列(string)の特定の文字の内、先頭にある文字だけを置換した結果を返します。

使用例

library(stringr)

text <- "Hello,World"

result <- str_replace(text, "l", "*")

cat(result)

出力：
> cat(result)
He*lo,World

まとめ

文字列(string)の特定の文字を置換する方法は、次の４つです。

• gsub()を使う方法
  result <- gsub(replace, new, text)
• sub()を使う方法
  result <- sub(replace, new, text)
• str_replace_all()を使う方法
  result <- str_replace_all(text, replace, new)
• str_replace()を使う方法
  result <- str_replace(text, replace, new)