R/JiangZhihangToolsmyplot.R

In jackingg/12345: Tools for STAT 3701 homework 3

  #' Wrapper function for ggplot2 for data d
  #'
  #' Computes the mean, variance and sd of a vector
  #'
  #' @param x data.frame
  #'
  #' @return ggplot2
  #' @export
  #' @examples
  #' data(d)
  #' plotMyData(d)
plotMyData<-function(x){
  library(magrittr)
  x%>% ggplot2::ggplot()+ggplot2::aes(x=x, y=p)+ggplot2::geom_point()
}