ChatGPT - Move legend ggplot