Pedro,

 

Utilize o comando text(labels(x),pos=2)

[ ]s

--
Enéias Façanha