r - 度数を (数値として) プロットに出力する

Question

Rでは、プロットに周波数を（数値として）挿入したいと思います：

my code to create the plot:
par(mar=c(4.5,4.5,9.5,4), xpd=TRUE)  
plot(factor(ArtMehrspr)~Mehrspr_Vielf, data=datProjektMehr, col=terrain.colors(4), 
     bty='L', main="Vielfalt nutzen")  
legend("topright", inset=c(0,-.225), title="Art der Mehrsprachigkeit",  levels(factor(datProjektMehr$ArtMehrspr)), 
       fill=terrain.colors(4), horiz=TRUE)  
par(mar=c(5,4,4,2)+0.1) 

プロットでは、データフレームの 2 つの列が示されています:ArtMehrsprとMehrspr_Vielf. ここで知りたいのは、カテゴリ「1」に「コンビ」がいくつあるか、カテゴリ「1」に「パラル」がいくつあるかなどです。次に、この数をプロットに出力します。プロットのボックスに、対応する観測数が表示されます。R はこれらの数値を知っている必要があります。そうしないと、観測数に応じてさまざまなボックスの高さを変えることができません。したがって、これらの数値をプロットに入れるのはそれほど難しいことではありませんね?

コマンドを使用すると、これらの数値を取得できますが、すべての数値を取得するtable()には 5 つのコマンドが必要です。table()カテゴリ = 1 の例:

> table(subset(datProjektMehr, Mehrspr_Vielf=="1")$ArtMehrspr)  
einspr  Kombi  Paral  Versc  Wechs   
0          1       9     2       1 

どうやら、コマンドを追加することで、私が探しているものを達成できるようですlabels = TRUE。しかし、それは機能しません:

par(mar=c(4.5,4.5,9.5,4), xpd=TRUE, labels = TRUE)  
plot(factor(ArtMehrspr)~Mehrspr_Vielf, data=datProjektMehr, col=terrain.colors(4), 
     bty='L', main="Vielfalt nutzen")  
legend("topright", inset=c(0,-.225), title="Art der Mehrsprachigkeit", levels(factor(datProjektMehr$ArtMehrspr)), 
       fill=terrain.colors(4), horiz=TRUE)  
par(mar=c(5,4,4,2)+0.1)

R から次の警告メッセージが表示されます。

Warning message:
In par(mar = c(4.5, 4.5, 9.5, 4), xpd = TRUE, labels = TRUE) :
  "labels" is not a graphical parameter

これは正しいコマンドではありませんか? 誰もこれを行う方法を知っていますか?