文字列を削除する関数をRで記述した。第二引数に正規表現を指定すると第一引数からすべてそれを取り除く