Sie möchten date
nicht verwenden als Objektname, da dies eine Funktion in Basis R ist. Aber ansonsten scheint Ihre Funktion zu funktionieren. Das Kernstück davon:
x <- as.Date(gsub(" GMT\\+0000 \\(UTC\\)", "",
'Tue Aug 12 2014 19:47:50 GMT+0000 (UTC)'),
format="%a %b %d %Y %T")
x
gibt zurück:
[1] "2014-08-12"
und
class(x)
gibt zurück:
[1] "Date"