R：马赛克图标签位置错误

Answer 1

我不确定你对这个情节的理想版本是什么，所以我添加了几件事，其中一些被注释掉，并附有关于其目的的注释。这样，您可以根据需要包含或排除这些选项。

我有 99% 的把握最多设置类似于边距：TRBL 或上、右、下、左。一个例子以及为什么这很重要 - 在马赛克上，您在顶部和左侧都有标签。

mosaic(data = Test, pop = F,
       ~Q2 + StrategischeWahl2021,
       direction = c("v", "h"),
       shade = TRUE,
       spacing = spacing_increase(start = 0.5, rate = 1.5), #creates space in plot
       labeling_args = list(
         # offset_labels = c(.3, .05, .05, 0),  # lifts labels away from plot
         # offset_varnames = c(.5, .5, .5, .5), # lifts varname away from plot
         just_labels = c("center", "right"), # Ja & Nein Ausrichtung
         gp_labels = gpar(fontsize = 10),    # make font smaller
         set_varnames = c(StrategischeWahl2021 = "StrategischeWähler2021",
                          Q2 = "Geschlecht"),
         set_labels = list(StrategischeWahl2021 = c("Nein", "Ja")),
         rep = FALSE), 
       gp = shading_hcl, gp_args = list(interpolate = c(1, 1.8)),
       margin = c(1, 1, 1, 4)) # if you lift varnames, add a margin!

如果您想要更多控制，可以使用grid 库。

gg <- grid.grab()
grid.newpage()
gg$children[[5]]$label <- "Pearson\nResiduen"
val <- gsub("^.*\\\n", "", gg$children[[6]]$label)
gg$children[[6]]$label <- paste0("p-Wert\n", val)
grid.draw(gg)