From dacc07a0ce9eda96afe13f4186cf17c167d4e7c8 Mon Sep 17 00:00:00 2001 From: Andre Chalom Date: Tue, 7 Jul 2015 00:32:17 -0300 Subject: [PATCH] Removed PLUE example (will add a better one on arXiv) --- man/PLUE.Rd | 19 ------------------- 1 file changed, 19 deletions(-) diff --git a/man/PLUE.Rd b/man/PLUE.Rd index 19d1da0..a82472e 100644 --- a/man/PLUE.Rd +++ b/man/PLUE.Rd @@ -18,29 +18,23 @@ PLUE(model=NULL, factors, N, LL, start, res.names=NULL, method = c("internal", " \method{print}{PLUE} (x, ...) \method{plot}{PLUE} (x, ...) } -%- maybe also 'usage' for other objects documented here. \arguments{ \item{model}{ The function to be run, representing the model or simulation. -%% ~~Describe \code{model} here~~ } \item{factors}{ The names of the input variables (used for naming the 'data' data.frame and in plotting) Either a vector of strings or a single number representing the number of factors -%% ~~Describe \code{factors} here~~ } \item{N}{ The number of samples to be generated by the Metropolis algorithm. -%% ~~Describe \code{N} here~~ } \item{LL}{ The POSITIVE Likelihood function to be used by the Metropolis algorithm. It must accept an array with length equal to the number of factors. -%% ~~Describe \code{LL} here~~ } \item{start}{ The initial point to be evaluated. Must have the same length as the number of factors. -%% ~~Describe \code{start} here~~ } \item{res.names}{ Optional: what are the names of the model results? (Used mainly for plotting) @@ -48,11 +42,9 @@ PLUE(model=NULL, factors, N, LL, start, res.names=NULL, method = c("internal", " \item{method}{ May be either "internal", which runs a naive and inneficient algorithm provided for test and didatic purposes, or "mcmc", which will run the \code{metrop} function from the \code{mcmc} package. -%% ~~Describe \code{method} here~~ } \item{opts}{ Further options to be passed to the Metropolis function. See the help on \code{mcmc::metrop}. -%% ~~Describe \code{opts} here~~ } \item{nboot}{ Number of bootstrap replicates for calculating the PRCC. @@ -77,14 +69,3 @@ PLUE(model=NULL, factors, N, LL, start, res.names=NULL, method = c("internal", " Further options } } -\examples{ - my.LL <- function(x) { - dbinom(10, 100, x[1], log=TRUE) - + dbinom(30, 100, x[2], log=TRUE) - + dbinom(90, 100, x[3], log=TRUE) - } - plue <- PLUE(model=function(x) x[,1]+x[,2]*x[,3], factors=3, - N=10000, LL=my.LL, start=rep(0.5, 3)) - print(plue) - plot(plue) -}