as_tidyplot function

Convert ggplot to tidyplot