R语言如何在条形图上显示每个bar 的数值？

tomorrow

如何在条形图上显示每个 bar 的数值？
如果明白 barplot() 函数其实是由低级绘图命令 rect() 函数构造的，那下面的例子也就不难理解了：
x <- 1:10 ; names(x) <- letters [1:10]
b <- barplot(x, col = rev(heat . colors (10)))
text(b , x , labels = x ,pos = 3)