Как рассчитать CI для таблицы сопряженности в R

Question

У меня есть akxl таблица пропорций выборки, вычисленная из таблицы непредвиденных обстоятельств akxl.И я хотел бы вычислить CI пропорций выборки таблицы, используя R.

Есть несколько способов сделать это для таблицы 1 xk, заполненной пропорциями.Но как насчет таблицы Akxl?Могу ли я сделать это с таблицей пропорций kxl построчным или столбцовым образом, в зависимости от способа расчета?

Например, у меня есть таблица типа:

       A     B     C     D
X  0.225 0.637 0.108 0.029
Y  0.455 0.171 0.252 0.122

from a contingency table,

    A  B  C  D
X  23 65 11  3
Y  56 21 31 15

Теоретически нормально получить CI следующим образом?

mat <- matrix(c(23, 65, 11, 3, 56, 21, 31, 15),
              ncol = 4, byrow = TRUE)

MultinomCI(mat[1, ],
           conf.level = 0.95,
           method = "sisonglaz")

MultinomCI(mat[2, ],
           conf.level = 0.95,
           method = "sisonglaz")

Интересно, что может быть лучший способ или функция.

Любые комментарии и ответы приветствуются.