Du vill inte använda date
som ett objektnamn, eftersom det är en funktion i bas R. Men annars verkar din funktion fungera. Kärnan i det:
x <- as.Date(gsub(" GMT\\+0000 \\(UTC\\)", "",
'Tue Aug 12 2014 19:47:50 GMT+0000 (UTC)'),
format="%a %b %d %Y %T")
x
returnerar:
[1] "2014-08-12"
och
class(x)
returnerar:
[1] "Date"