@Leandro Marino-2

Obrigado pela ajuda. Presumo que no final seja necessário acrescentar " ) " certo?

De qualquer forma dá-me o seguinte erro:

Error in df$QTD : object of type 'closure' is not subsettable

O que estará a acontecer de errado?

Obrigado.
Cumps.