! 文字型の数字を数値型に変換する

CSVファイルで入手したデータの数字部分が三桁区切りの文字列だったということはたまにある。  
また、HTMLのテーブルデータはtdセルのなかにあるのは文字列である。  

これらを、読み込んだ後に文字列から数値に変換する。

 > comma
 [1] "▲123,456"      "34,567"         "23"             "△ 2,345,678"  
 [5] "△▲はマイナス"

 > comma %>% print %>%
 str_replace_all(pattern = "△|▲", "-") %>% print %>%  #▲または△をマイナス符号に置き換える
 str_replace_all("\\s", "") %>% print %>% #スペースと改行符号を除去
 str_replace_all(",","") %>% print  #カンマ区切りを除去
 as.numeric #数値型に変換

出力結果は

 [1] "▲123,456"      "34,567"         "23"             "△ 2,345,678"  
 [5] "△▲はマイナス"
 [1] "-123,456"     "34,567"       "23"           "- 2,345,678"  "--はマイナス"
 [1] "-123,456"     "34,567"       "23"           "-2,345,678"   "--はマイナス"
 [1] "-123456"      "34567"        "23"           "-2345678"     "--はマイナス"
 [1]  -123456    34567       23 -2345678       NA
 警告メッセージ: 
 function_list[[k]](value) で:   強制変換により NA が生成されました 
 >