Измените шрифт графика с взаимодействием_плота (взаимодействия пакета)

Question

Я пытаюсь построить график двустороннего взаимодействия с использованием функции interact_plot в interactions.Как изменить размер шрифта на Times New Roman?

Вот мой код:

interact_plot(Interac2, pred = SA, modx = RPF, alpha = .05, legend.main = "RP", x.label = "EXB", y.label = "NORCA")

Answer 1

Во-первых, я заметил, что вы упомянули interact_plot в jtools. В документации сказано, что эта функция устарела и перемещена в пакет interactions (который я также отредактировал в вашем вопросе). Глядя на исходный код на GitHub , видно, что конечный объект - это ggplot объект. И это здорово, потому что вы можете изменить «тему» ​​этого объекта после того, как он будет построен. Вы модифицируете тему и переназначаете ее и вуаля.

Поскольку я нахожусь в Windows и нуждаюсь в советах по изменению шрифта на TNY, я нашел этот пост . Некоторые примеры из interact_plot не сработали, но мне удалось изменить тот, который сработал.

library(interactions)
library(extrafont)
loadfonts(device = "win")

fit <- lm(Income ~ HSGrad * Murder * Illiteracy, data = states)
xy <- interact_plot(model = fit, pred = Murder, modx = Illiteracy, mod2 = HSGrad)
xy + theme(axis.title = element_text(family = "serif"),
           legend.text = element_text(family = "serif"),
           legend.title = element_text(family = "serif"),
           strip.text = element_text(family = "serif"))