Creating AL plot

plot(al_rf) +
  ggplot2::ggtitle("Accumulated-local profiles for no. of rooms and surface", "")