У меня есть база данных, в которой я измерил, существует ли связь между двумя качественными переменными с помощью chi2. Теперь я хотел бы графически отобразить, как выглядят отклонения от теоретической модели (положительные, отрицательные и т. Д. c.). Благодаря своим исследованиям я нашел библиотеку VCD, которая полностью соответствует моим потребностям.
Я создаю свою таблицу
> (tab = table (data $ etat_sante_mental_bin, data $ area, deparse.level = 2))
data $ containment_place
data $ etat_sante_mental_bin In_the_countryside In_town
1-VERY HARM 18 5
2-MAL 18 4
3-GOOD 67 28
4-VERY GOOD 253 36
Вот график, который я создал на данный момент:
> mosaic (tab, shade = TRUE, labeling_args = list (gp_labels = gpar (fontsize = 16), gp_varnames = gpar (fontsize = 18)), legend_args = list (fontsize = 16), margins = unit (3, "lines" ), legend_width = unit (7, "lines"), labeling = labeling_border (rot_labels = c (0, 0, 0, 0), just_labels = c ("left", "center", "center", "right") ))
https://zupimages.net/viewer.php?id=20 / 22 / 73uj.png -> Не очень чисто, но результат меня вполне устраивает.
Теперь я бы хотел «вставить» соответствующее процентное значение строки в центре каждого из моих прямоугольников. Видел сбоку «labeling_cells», но совсем не знаю как это сделать ...
Спасибо.