No quieres usar date
como un nombre de objeto, ya que es una función en base R. Pero de lo contrario, su función parece funcionar. La parte central de esto:
x <- as.Date(gsub(" GMT\\+0000 \\(UTC\\)", "",
'Tue Aug 12 2014 19:47:50 GMT+0000 (UTC)'),
format="%a %b %d %Y %T")
x
devuelve:
[1] "2014-08-12"
y
class(x)
devuelve:
[1] "Date"