Sqlite Replace Function In R