This function creates a plot object that can be used in a moodle quiz
png64(plt)
plt
some graph object
plt <- ggplot(mtcars, aes(x=disp, y=mpg))+geom_point() plt64 <- png64(plt)