Non vuoi usare date
come nome di un oggetto, poiché è una funzione in base R. Ma per il resto la tua funzione sembra funzionare. Il pezzo centrale di esso:
x <- as.Date(gsub(" GMT\\+0000 \\(UTC\\)", "",
'Tue Aug 12 2014 19:47:50 GMT+0000 (UTC)'),
format="%a %b %d %Y %T")
x
resi:
[1] "2014-08-12"
e
class(x)
resi:
[1] "Date"