Se você quer só a porção numérica substitua o que *não for número* (\D) por nada. Assim:

> x <- c('1 anos(s)', '10 anos(s)', '11 ano(s)', '12 ano(s)', '13 ano(s)',
+        '14 ano(s)')
> as.integer(gsub("\\D", "", x))
[1]  1 10 11 12 13 14
>

À disposição.

Walmes.