library(devtools) install_github("https://github.com/VMartino97/MartinoProbFinal.git") library(MartinoProbFinal)
Input Details
n is the desired number of samples pdf is the pdf the user must assign using the fucntion command a is the lower bound b is the upper bound C is the numeric that f(x) must be less than or equal to
pdf <- function(x) {3*x} accept.reject(5,pdf,0,1,.5) # Should return values of the samples.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.