r - テーブル内の行変数の名前を変更する方法

Question

行の名前を変更するのは簡単ですが(たとえば、 を使用rownames())、それは私が求めているものではありません。検討：

> newTab <- xtabs(~as.factor(letters[1:2])+LETTERS[1:2])
> newTab
                       LETTERS[1:2]
as.factor(letters[1:2]) A B
                      a 1 0
                      b 0 1

私はこれを取得したい:

          upper case
lower case A B
         a 1 0
         b 0 1

しかし、私が試してみると：

> dimnames(newTab) <- list("lower case", "upper case")

エラーが発生します：

dimnames(newTab) のエラー <- list("lower case", "upper case") :
'dimnames' [1] の長さが配列の範囲と等しくありません