An R Package extending Some Useful function from ggplot2