R Ошибка при попытке построить таблицу сопряженности в виде графика рядом друг с другом.

Question

У меня возникла проблема при создании фрейма данных для использования при построении значений таблицы непредвиденных обстоятельств (за вычетом сумм). Вот текущая таблица непредвиденных обстоятельств (в виде кадра данных):

              Nauseau_Y         Nauseau_N    Sum
Anesthesia_A         26                13    39
Anesthesia_A         10                23    33
Sum                  36                36    72

Я пытаюсь создать параллельную гистограмму, показывающую тошноту (да или нет) на горизонтальной оси и в цветовой кодировке столбики для обозначения типа анестетика c. Вот что мне нужно, чтобы создать данные графика

plotdata=data.frame("Anesthesia_Type"=c("Anesthesia A","Anesthesia B"),
                    "Anesthesia A"=c(anes_df$Nauseau_Y[1],anes_df$Nauseau_Y[2]),
                    "Anesthesia B"=c(anes_df$Nauseau_N[1],anes_df$Nauseau_N[2]),
                    row.names = c("st1","st2"))

, и я получаю ошибку:

Error in data.frame(Anesthesia_Type = c("Anesthesia A", "Anesthesia B"), : arguments imply differing number of rows: 2, 0

Итак, вопрос в том, как создать кадр данных, чтобы построить его так, как я хочешь?