A subtração lubrificada retorna apenas um valor numérico

Eu tenho uma variável chamadaStarted que é a data em que indivíduos humanos se inscreveram em um estudo e outra variável chamadados1 que é a data em que o sujeito fez a última cirurgia. Quero calcular quantos meses desde a última cirurgia até o dia da inscrição. Eu tentei:

as.period(syrrupan$Started-syrrupan$dos1,units=c("month"))

Eu esperava que isso me desse algo como:

14, 18, 1, 26 

Com cada número sendo o número de meses.

Em vez disso, recebo:

1 year, -4 months, -5 days and -1 hours   1 year, -5 months, -23 days and -1 hours   1 year, -7 months, 2 days and -1 hours   1 year, -8 months, -28 days and 1 hour   1 year, -7 months, -23 days and 1 hour.   

Como posso obter apenas o valor numérico de meses?

questionAnswers(2)

yourAnswerToTheQuestion