I have some data I'm plotting like this:g <- ggplot(datapile, aes(x = Re, y = CD))g <- g +