===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
r-cran-pscl-1.5.5/vignettes/countreg.Rnw-350-specified. One application would be the geometric model, the
r-cran-pscl-1.5.5/vignettes/countreg.Rnw:351:special case where $\theta = 1$, which can consequently be
r-cran-pscl-1.5.5/vignettes/countreg.Rnw-352-fitted in \proglang{R} by setting
##############################################
r-cran-pscl-1.5.5/R/odTest.R-10-
r-cran-pscl-1.5.5/R/odTest.R:11: poissonGLM <- glm(formula=eval(glmobj$call$formula),
r-cran-pscl-1.5.5/R/odTest.R:12: data=eval(glmobj$call$data),
r-cran-pscl-1.5.5/R/odTest.R-13- family="poisson")
##############################################
r-cran-pscl-1.5.5/R/plot.ideal.r-6- if(is.null(burnin))
r-cran-pscl-1.5.5/R/plot.ideal.r:7: keep <- checkBurnIn(x,eval(x$call$burnin,envir=.GlobalEnv))
r-cran-pscl-1.5.5/R/plot.ideal.r-8- else
##############################################
r-cran-pscl-1.5.5/R/plot.ideal.r-37- if(is.null(burnin))
r-cran-pscl-1.5.5/R/plot.ideal.r:38: keep <- checkBurnIn(x,eval(x$call$burnin,envir=.GlobalEnv))
r-cran-pscl-1.5.5/R/plot.ideal.r-39- else
##############################################
r-cran-pscl-1.5.5/R/plot.ideal.r-58- cat(paste("in rollcall object",x$call$object,"\n"))
r-cran-pscl-1.5.5/R/plot.ideal.r:59: tmpObject <- dropRollCall(eval(x$call$object),
r-cran-pscl-1.5.5/R/plot.ideal.r:60: eval(x$call$dropList))
r-cran-pscl-1.5.5/R/plot.ideal.r-61- party <- tmpObject$legis.data$party ## extract party info
##############################################
r-cran-pscl-1.5.5/R/plot.ideal.r-78- "% CIs",sep="")
r-cran-pscl-1.5.5/R/plot.ideal.r:79: if(!is.null(eval(x$call$object)$desc))
r-cran-pscl-1.5.5/R/plot.ideal.r:80: mainString <- paste(eval(x$call$object)$desc,"\n",mainString)
r-cran-pscl-1.5.5/R/plot.ideal.r-81-
##############################################
r-cran-pscl-1.5.5/R/plot.ideal.r-146- if(is.null(burnin))
r-cran-pscl-1.5.5/R/plot.ideal.r:147: keep <- checkBurnIn(x,eval(x$call$burnin,envir=.GlobalEnv))
r-cran-pscl-1.5.5/R/plot.ideal.r-148- else
##############################################
r-cran-pscl-1.5.5/R/plot.ideal.r-165- "Posterior Means")
r-cran-pscl-1.5.5/R/plot.ideal.r:166: if(!is.null(eval(x$call$object)$desc))
r-cran-pscl-1.5.5/R/plot.ideal.r:167: mainString <- paste(eval(x$call$object)$desc,"\n",mainString)
r-cran-pscl-1.5.5/R/plot.ideal.r-168-
##############################################
r-cran-pscl-1.5.5/R/plot.ideal.r-199- ## get a copy of the rollcall object used by ideal object
r-cran-pscl-1.5.5/R/plot.ideal.r:200: tmpObject <- dropRollCall(eval(x$call$object),
r-cran-pscl-1.5.5/R/plot.ideal.r:201: eval(x$call$dropList))
r-cran-pscl-1.5.5/R/plot.ideal.r-202- party <- tmpObject$legis.data$party ## extract party info
##############################################
r-cran-pscl-1.5.5/R/plot.ideal.r-320- if(is.null(burnin))
r-cran-pscl-1.5.5/R/plot.ideal.r:321: keep <- checkBurnIn(object,eval(object$call$burnin,envir=.GlobalEnv))
r-cran-pscl-1.5.5/R/plot.ideal.r-322- else
##############################################
r-cran-pscl-1.5.5/R/plot.ideal.r-453- paste("Two-dimensional trace plots, MCMC iterations,\n",
r-cran-pscl-1.5.5/R/plot.ideal.r:454: eval(object$call$object)$desc,
r-cran-pscl-1.5.5/R/plot.ideal.r-455- ", Iterations ",
##############################################
r-cran-pscl-1.5.5/R/summary.ideal.r-9- cat(paste("Number of Iterations:\t",
r-cran-pscl-1.5.5/R/summary.ideal.r:10: eval(x$call$maxiter,envir=.GlobalEnv),
r-cran-pscl-1.5.5/R/summary.ideal.r-11- "\n"))
r-cran-pscl-1.5.5/R/summary.ideal.r-12- cat(paste("\tThinned By:\t",
r-cran-pscl-1.5.5/R/summary.ideal.r:13: eval(x$call$thin,envir=.GlobalEnv),"\n"))
r-cran-pscl-1.5.5/R/summary.ideal.r-14- cat(paste("\tBurn-in:\t",
r-cran-pscl-1.5.5/R/summary.ideal.r:15: eval(x$call$burnin,envir=.GlobalEnv),"\n\n"))
r-cran-pscl-1.5.5/R/summary.ideal.r-16-
##############################################
r-cran-pscl-1.5.5/R/summary.ideal.r-31-
r-cran-pscl-1.5.5/R/summary.ideal.r:32: printHeader(eval(x$call$object))
r-cran-pscl-1.5.5/R/summary.ideal.r-33- printHeaderIdeal(x)
##############################################
r-cran-pscl-1.5.5/R/summary.ideal.r-65- if(is.null(burnin)){
r-cran-pscl-1.5.5/R/summary.ideal.r:66: keep <- checkBurnIn(object,eval(object$call$burnin,envir=.GlobalEnv))
r-cran-pscl-1.5.5/R/summary.ideal.r-67- } else {
##############################################
r-cran-pscl-1.5.5/R/summary.ideal.r-135- if(!is.null(object$call$dropList)){
r-cran-pscl-1.5.5/R/summary.ideal.r:136: party <- dropRollCall(eval(object$call$object),
r-cran-pscl-1.5.5/R/summary.ideal.r:137: eval(object$call$dropList))$legis.data$partyName
r-cran-pscl-1.5.5/R/summary.ideal.r-138- if(is.null(party))
r-cran-pscl-1.5.5/R/summary.ideal.r:139: party <- dropRollCall(eval(object$call$object),
r-cran-pscl-1.5.5/R/summary.ideal.r:140: eval(object$call$dropList))$legis.data$party
r-cran-pscl-1.5.5/R/summary.ideal.r-141- } else {
r-cran-pscl-1.5.5/R/summary.ideal.r:142: party <- eval(object$call$object)$legis.data$partyName
r-cran-pscl-1.5.5/R/summary.ideal.r-143- if(is.null(party))
r-cran-pscl-1.5.5/R/summary.ideal.r:144: party <- eval(object$call$object)$legis.data$party
r-cran-pscl-1.5.5/R/summary.ideal.r-145- }
##############################################
r-cran-pscl-1.5.5/R/summary.ideal.r-185- cat("Markov chain Monte Carlo Analysis of Roll Call Data\n")
r-cran-pscl-1.5.5/R/summary.ideal.r:186: m <- eval(x$object)$m
r-cran-pscl-1.5.5/R/summary.ideal.r:187: d <- eval(x$object)$d
r-cran-pscl-1.5.5/R/summary.ideal.r-188- if(d==1)
##############################################
r-cran-pscl-1.5.5/R/summary.ideal.r-192-
r-cran-pscl-1.5.5/R/summary.ideal.r:193: printHeader(eval(eval(x$object)$call$object))
r-cran-pscl-1.5.5/R/summary.ideal.r:194: printHeaderIdeal(eval(x$object))
r-cran-pscl-1.5.5/R/summary.ideal.r-195-
##############################################
r-cran-pscl-1.5.5/R/summary.ideal.r-233-
r-cran-pscl-1.5.5/R/summary.ideal.r:234: tmpRollCall <- computeMargins(object=eval(eval(x$object)$call$object),
r-cran-pscl-1.5.5/R/summary.ideal.r:235: dropList=eval(eval(x$object)$call$dropList))
r-cran-pscl-1.5.5/R/summary.ideal.r-236-
##############################################
r-cran-pscl-1.5.5/R/toMCMC.r-7- if(is.null(burnin))
r-cran-pscl-1.5.5/R/toMCMC.r:8: b <- eval(object$call$burnin)
r-cran-pscl-1.5.5/R/toMCMC.r-9- keep <- checkBurnIn(object,b)
##############################################
r-cran-pscl-1.5.5/R/toMCMC.r-25- start=iters[1],
r-cran-pscl-1.5.5/R/toMCMC.r:26: thin=eval(object$call$thin),
r-cran-pscl-1.5.5/R/toMCMC.r-27- end=iters[length(iters)]
##############################################
r-cran-pscl-1.5.5/R/postProcess.r-86- ## form id vector, where are the named legislators in the ideal object?
r-cran-pscl-1.5.5/R/postProcess.r:87: legis.names <- dimnames(eval(object$call$object)$votes)[[1]]
r-cran-pscl-1.5.5/R/postProcess.r-88- if(is.null(legis.names)){
##############################################
r-cran-pscl-1.5.5/R/postProcess.r-113-
r-cran-pscl-1.5.5/R/postProcess.r:114: haveBeta <- eval(object$call$store.item)
r-cran-pscl-1.5.5/R/postProcess.r-115- if(haveBeta){
##############################################
r-cran-pscl-1.5.5/R/postProcess.r-182-implementConstraints <- function(object,tMat,debug){
r-cran-pscl-1.5.5/R/postProcess.r:183: haveBeta <- eval(object$call$store.item)
r-cran-pscl-1.5.5/R/postProcess.r-184- if(haveBeta){
##############################################
r-cran-pscl-1.5.5/R/postProcess.r-195- ##if(is.symbol(object$call$burnin)){
r-cran-pscl-1.5.5/R/postProcess.r:196: ## burnin <- eval(object$call$burnin)
r-cran-pscl-1.5.5/R/postProcess.r-197- ##} else {
##############################################
r-cran-pscl-1.5.5/R/postProcess.r-200- keep <- checkBurnIn(object,
r-cran-pscl-1.5.5/R/postProcess.r:201: burnin=eval(object$call$burnin))
r-cran-pscl-1.5.5/R/postProcess.r-202-
##############################################
r-cran-pscl-1.5.5/R/rollcall.r-566- rcObjName <- rcObj
r-cran-pscl-1.5.5/R/rollcall.r:567: if(!is.null(eval(rcObj)$desc))
r-cran-pscl-1.5.5/R/rollcall.r-568- cat(paste("\nSummary of rollcall object",
##############################################
r-cran-pscl-1.5.5/R/extractVotes.r-8-
r-cran-pscl-1.5.5/R/extractVotes.r:9: rcObj <- eval(object$call$object)
r-cran-pscl-1.5.5/R/extractVotes.r:10: dropList <- eval(object$call$dropList)
r-cran-pscl-1.5.5/R/extractVotes.r-11-
##############################################
r-cran-pscl-1.5.5/R/predict.ideal.r-14- if(is.null(burnin))
r-cran-pscl-1.5.5/R/predict.ideal.r:15: keep <- checkBurnIn(object,eval(object$call$burnin))
r-cran-pscl-1.5.5/R/predict.ideal.r-16- else
##############################################
r-cran-pscl-1.5.5/R/predict.ideal.r-22- "\n"))
r-cran-pscl-1.5.5/R/predict.ideal.r:23: rcObj <- try(dropRollCall(eval(object$call$object),
r-cran-pscl-1.5.5/R/predict.ideal.r:24: eval(object$call$dropList)),
r-cran-pscl-1.5.5/R/predict.ideal.r-25- silent=TRUE)
##############################################
r-cran-pscl-1.5.5/R/predict.ideal.r-72- pp <- NULL ## by party
r-cran-pscl-1.5.5/R/predict.ideal.r:73: party <- eval(object$call$object)$legis.data$party
r-cran-pscl-1.5.5/R/predict.ideal.r-74- if(!is.null(party))
##############################################
r-cran-pscl-1.5.5/R/predict.ideal.r-100- "\n"))
r-cran-pscl-1.5.5/R/predict.ideal.r:101: cat(paste(x$ideal,"uses rollcall object",eval(x$ideal)$call$object,"\n"))
r-cran-pscl-1.5.5/R/predict.ideal.r:102: rcObj <- eval(x$ideal)$call$object
r-cran-pscl-1.5.5/R/predict.ideal.r-103- printHeader(eval(rcObj))
##############################################
r-cran-pscl-1.5.5/R/predict.ideal.r-134-
r-cran-pscl-1.5.5/R/predict.ideal.r:135: d <- eval(x$ideal)$d
r-cran-pscl-1.5.5/R/predict.ideal.r:136: desc <- eval(eval(x$ideal)$call$object)$desc
r-cran-pscl-1.5.5/R/predict.ideal.r:137: rcObj <- extractRollCallObject(eval(x$ideal))
r-cran-pscl-1.5.5/R/predict.ideal.r-138-
##############################################
r-cran-pscl-1.5.5/R/predict.ideal.r-141- ## dimension by dimension
r-cran-pscl-1.5.5/R/predict.ideal.r:142: xbar <- eval(x$ideal)$xbar
r-cran-pscl-1.5.5/R/predict.ideal.r:143: n <- eval(x$ideal)$n
r-cran-pscl-1.5.5/R/predict.ideal.r-144-
##############################################
r-cran-pscl-1.5.5/R/hurdle.R-618- if(is.null(offsetz)) offsetz <- rep.int(0, NROW(Z))
r-cran-pscl-1.5.5/R/hurdle.R:619: if(!is.null(object$call$offset)) offsetx <- offsetx + eval(object$call$offset, newdata)
r-cran-pscl-1.5.5/R/hurdle.R-620- }
##############################################
r-cran-pscl-1.5.5/R/zeroinfl.R-635- if(is.null(offsetz)) offsetz <- rep.int(0, NROW(Z))
r-cran-pscl-1.5.5/R/zeroinfl.R:636: if(!is.null(object$call$offset)) offsetx <- offsetx + eval(object$call$offset, newdata)
r-cran-pscl-1.5.5/R/zeroinfl.R-637-
##############################################
r-cran-pscl-1.5.5/inst/doc/countreg.Rnw-350-specified. One application would be the geometric model, the
r-cran-pscl-1.5.5/inst/doc/countreg.Rnw:351:special case where $\theta = 1$, which can consequently be
r-cran-pscl-1.5.5/inst/doc/countreg.Rnw-352-fitted in \proglang{R} by setting