Assumindo o conteúdo do dput armazenado em um objeto dados...

dados2 <- dados$afia3[-which(is.na(dados$afia3))]

Pra funcionar com essa solução deve-se endereçar o elemento da lista 'afia3'.

================================================
Éder Comunello

Ph.D. Student in Agricultural Systems Engineering (USP/ESALQ)
Piracicaba, SP, Brazil [22 42.7'S, 47 37.8'W]

Researcher at Embrapa Western Region Agriculture
Dourados, MS, Brazil [22 16.5'S, 54 49.0'W]
================================================
UTC-03:00