Моя проблема связана с пакетом автомобилей.
Я создаю кернальный сюжет. Однако, поскольку легенда слишком велика, я хотел бы переместить легенду за пределы сюжета, верхний или нижний? В противном случае я попытался с cowplot :: get_legend (), но он не работал должным образом.
library(car)
mtcars$g <- as.factor(mtcars$vs)
densityPlot(mpg,mtcars$g,show.bw=T, kernel=depan,legend=list(location="topleft",title=NULL))