The code below creates a scatter plot and uses theme_bw with has gridlines in the background -
data = mtcars data %>% select(mpg, disp) %>% ggplot(ae