# NOT RUN {
# }
# NOT RUN {
url <- paste0("https://github.com/lzyacht/bpgmm-examples/",
"blob/master/data/CalculateProposalLambda.RData?raw=true")
download.file(url, destfile= "CalculateProposalLambda.RData", mode = "wb")
load("CalculateProposalLambda.RData")
likelihood(thetaYList, ZOneDim,qVec,muBar, X)
# }
Run the code above in your browser using DataLab