knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
  library(LuoYinengTools)

ggplot example

#data(d)
#luoplot1(d$x,d$p)
#luoplot2(d$x,d$p)
#luoplot3(d$x,d$p)
#x1 <- rgamma(100, 3)
#func10 = function(theta,x1) dgamma(x1, shape = theta,log = TRUE)
#result7_gamma <- func10(x1, func1, c(0,3))
#result7_gamma


luoxx561/YinengLuoTools documentation built on May 25, 2019, 9:32 p.m.