Получение 2х2 индивидуального стола по отделам

Question

Моя задача - проанализировать набор данных «UCBAmissions» в R. Моя функция берет таблицу 2 на 2 и анализирует ее. Я уже провел анализ данных, агрегированных по отделам, со следующим кодом: apply(UCBAdmissions,c(1,2), sum). Моя попытка состоит в том, чтобы иметь несколько таблиц 2 на 2 с агрегированием по отдельным отделам: A, B, C, D, E, F. Как я могу сделать или отсортировать данные, чтобы иметь отдельные агрегированные таблицы.

#I have tried using sweep in 'R' by my hint. Here is my code: 

sweep(UCBAdmissions,c(2,3),apply(UCBAdmissions,c(2,3),sum),"/")
#I just don't want this to be prob. 

Answer 1

Похоже, вы ищете базовые asplit и list2env функции для разделения массива по его 3-му измерению на отдельные таблицы в глобальной среде:

 A <- asplit(UCBAdmissions, 3)

Вывод:

> A
$A
          Gender
Admit      Male Female
  Admitted  512     89
  Rejected  313     19

$B
          Gender
Admit      Male Female
  Admitted  353     17
  Rejected  207      8

$C
          Gender
Admit      Male Female
  Admitted  120    202
  Rejected  205    391

$D
          Gender
Admit      Male Female
  Admitted  138    131
  Rejected  279    244

$E
          Gender
Admit      Male Female
  Admitted   53     94
  Rejected  138    299

$F
          Gender
Admit      Male Female
  Admitted   22     24
  Rejected  351    317

Еще один шаг для получения отдельных таблиц:

list2env(A,envir = .GlobalEnv)

Чтобы отобразить таблицу, созданную в глобальной среде:

> B
          Gender
Admit      Male Female
  Admitted  353     17
  Rejected  207      8