===========================================================
                                      .___ __  __   
          _________________  __ __  __| _/|__|/  |_ 
         / ___\_` __ \__  \ |  |  \/ __ | | \\_  __\
        / /_/  >  | \// __ \|  |  / /_/ | |  ||  |  
        \___  /|__|  (____  /____/\____ | |__||__|  
       /_____/            \/           \/           
              grep rough audit - static analysis tool
                  v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
r-cran-zelig-5.1.6.1/tests/testthat/test-arima.R-83-
r-cran-zelig-5.1.6.1/tests/testthat/test-arima.R:84:    myorder <- eval(zj$zelig.call$order)
r-cran-zelig-5.1.6.1/tests/testthat/test-arima.R-85-    mycoef <- coef(zj$zelig.out$z.out[[1]])
##############################################
r-cran-zelig-5.1.6.1/R/model-probit-bayes.R-99-    .self$link <- "probit"
r-cran-zelig-5.1.6.1/R/model-probit-bayes.R:100:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-probit-bayes.R-101-    .self$year <- 2013
##############################################
r-cran-zelig-5.1.6.1/R/model-gamma-gee.R-86-    .self$link <- "inverse"
r-cran-zelig-5.1.6.1/R/model-gamma-gee.R:87:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-gamma-gee.R-88-    .self$year <- 2011
##############################################
r-cran-zelig-5.1.6.1/R/model-poisson.R-77-    .self$link <- "log"
r-cran-zelig-5.1.6.1/R/model-poisson.R:78:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-poisson.R-79-    .self$authors <- "Kosuke Imai, Gary King, Olivia Lau"
##############################################
r-cran-zelig-5.1.6.1/R/model-poisson-bayes.R-94-    .self$link <- "log"
r-cran-zelig-5.1.6.1/R/model-poisson-bayes.R:95:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-poisson-bayes.R-96-    .self$year <- 2013
##############################################
r-cran-zelig-5.1.6.1/R/model-zelig.R-500-    .self$data <- tbl_df(.self$data)
r-cran-zelig-5.1.6.1/R/model-zelig.R:501:    #.self$zelig.out <- eval(fn2(.self$model.call, data = data)) # shortened test version that bypasses "by"
r-cran-zelig-5.1.6.1/R/model-zelig.R-502-    .self$zelig.out <- .self$data %>%
##############################################
r-cran-zelig-5.1.6.1/R/model-zelig.R-796-                            depvar = depvar, treatment = treatment,
r-cran-zelig-5.1.6.1/R/model-zelig.R:797:                            treated = treated) )   # z.out = eval(fn2(.self$model.call, quote(as.data.frame(.)))))
r-cran-zelig-5.1.6.1/R/model-zelig.R-798-
##############################################
r-cran-zelig-5.1.6.1/R/model-lognorm.R-122-      group_by_(.self$by) %>%
r-cran-zelig-5.1.6.1/R/model-lognorm.R:123:      do(z.out = eval(fn2(robust.model.call, quote(as.data.frame(.))))$var )
r-cran-zelig-5.1.6.1/R/model-lognorm.R-124-
##############################################
r-cran-zelig-5.1.6.1/R/model-mlogit-bayes.R-113-    level <- length(table(resp))
r-cran-zelig-5.1.6.1/R/model-mlogit-bayes.R:114:    p <- dim(model.matrix(eval(.self$formula), data = .self$data))[2]
r-cran-zelig-5.1.6.1/R/model-mlogit-bayes.R-115-    coef <- simparam
##############################################
r-cran-zelig-5.1.6.1/R/model-normal-survey.R-80-    .self$link <- "identity"
r-cran-zelig-5.1.6.1/R/model-normal-survey.R:81:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-normal-survey.R-82-    .self$category <- "continuous"
##############################################
r-cran-zelig-5.1.6.1/R/model-weibull.R-130-      group_by_(.self$by) %>%
r-cran-zelig-5.1.6.1/R/model-weibull.R:131:      do(z.out = eval(fn2(robust.model.call, quote(as.data.frame(.))))$var )
r-cran-zelig-5.1.6.1/R/model-weibull.R-132-
##############################################
r-cran-zelig-5.1.6.1/R/model-binchoice.R-25-  qi = function(simparam, mm) {
r-cran-zelig-5.1.6.1/R/model-binchoice.R:26:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-binchoice.R-27-    coeff <- simparam
##############################################
r-cran-zelig-5.1.6.1/R/model-tobit.R-124-        group_by_(.self$by) %>%
r-cran-zelig-5.1.6.1/R/model-tobit.R:125:        do(z.out = eval(fn2(robust.model.call, quote(as.data.frame(.))))$var )
r-cran-zelig-5.1.6.1/R/model-tobit.R-126-
##############################################
r-cran-zelig-5.1.6.1/R/model-arima.R-90-        .self$fn <- quote(zeligArimaWrapper)
r-cran-zelig-5.1.6.1/R/model-arima.R:91:        #.self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-arima.R-92-        .self$description <- "Autoregressive Moving-Average Models for Time-Series Data"
##############################################
r-cran-zelig-5.1.6.1/R/model-arima.R-101-
r-cran-zelig-5.1.6.1/R/model-arima.R:102:    myorder <- eval(.self$zelig.call$order)
r-cran-zelig-5.1.6.1/R/model-arima.R-103-    mycoef <- coef(.self$zelig.out$z.out[[1]])
##############################################
r-cran-zelig-5.1.6.1/R/model-arima.R-213-
r-cran-zelig-5.1.6.1/R/model-arima.R:214:    #order <- eval(.self$zelig.call$order)
r-cran-zelig-5.1.6.1/R/model-arima.R-215-    myar <- myma <- myar.seq <- myma.seq <- NULL
##############################################
r-cran-zelig-5.1.6.1/R/model-normal.R-87-    .self$link <- "identity"
r-cran-zelig-5.1.6.1/R/model-normal.R:88:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-normal.R-89-    .self$authors <- "Kosuke Imai, Gary King, Olivia Lau"
##############################################
r-cran-zelig-5.1.6.1/R/model-logit-bayes.R-98-    .self$link <- "logit"
r-cran-zelig-5.1.6.1/R/model-logit-bayes.R:99:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-logit-bayes.R-100-    .self$year <- 2013
##############################################
r-cran-zelig-5.1.6.1/R/model-quantile.R-125-    if (!is.null(.self$model.call$tau)) {
r-cran-zelig-5.1.6.1/R/model-quantile.R:126:        if (length(eval(.self$model.call$tau)) > 1) {
r-cran-zelig-5.1.6.1/R/model-quantile.R-127-            stop('tau argument only accepts 1 value.\nZelig is using only the first value.',
##############################################
r-cran-zelig-5.1.6.1/R/model-quantile.R-129-        } else
r-cran-zelig-5.1.6.1/R/model-quantile.R:130:            .self$tau <- eval(.self$model.call$tau)
r-cran-zelig-5.1.6.1/R/model-quantile.R-131-#        if (length(.self$tau) > 1) {
r-cran-zelig-5.1.6.1/R/model-quantile.R:132:#            localData <- bind_rows(lapply(eval(.self$tau),
r-cran-zelig-5.1.6.1/R/model-quantile.R-133-#                                      function(tau) cbind(tau, localData)))
##############################################
r-cran-zelig-5.1.6.1/R/model-poisson-survey.R-75-    .self$link <- "log"
r-cran-zelig-5.1.6.1/R/model-poisson-survey.R:76:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-poisson-survey.R-77-    .self$category <- "continuous"
##############################################
r-cran-zelig-5.1.6.1/R/model-relogit.R-210-  qi = function(simparam, mm) {
r-cran-zelig-5.1.6.1/R/model-relogit.R:211:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-relogit.R-212-    coeff <- simparam
##############################################
r-cran-zelig-5.1.6.1/R/model-poisson-gee.R-83-    .self$link <- "log"
r-cran-zelig-5.1.6.1/R/model-poisson-gee.R:84:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-poisson-gee.R-85-    .self$year <- 2011
##############################################
r-cran-zelig-5.1.6.1/R/interface.R-51-
r-cran-zelig-5.1.6.1/R/interface.R:52:    new_obj <- eval(parse(text = sprintf("%s$new()", zmodel)))
r-cran-zelig-5.1.6.1/R/interface.R-53-    new_obj$mi <- FALSE
##############################################
r-cran-zelig-5.1.6.1/R/model-normal-gee.R-89-    .self$link <- "identity"
r-cran-zelig-5.1.6.1/R/model-normal-gee.R:90:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-normal-gee.R-91-    .self$year <- 2011
##############################################
r-cran-zelig-5.1.6.1/R/model-gamma-survey.R-76-    .self$link <- "inverse"
r-cran-zelig-5.1.6.1/R/model-gamma-survey.R:77:    .self$linkinv <- eval(call(.self$family, .self$link))$linkinv
r-cran-zelig-5.1.6.1/R/model-gamma-survey.R-78-    .self$category <- "continuous"
##############################################
r-cran-zelig-5.1.6.1/debian/tests/run-unit-test-3-oname=Zelig
r-cran-zelig-5.1.6.1/debian/tests/run-unit-test:4:pkg=r-cran-`echo $oname | tr '[A-Z]' '[a-z]'`
r-cran-zelig-5.1.6.1/debian/tests/run-unit-test-5-
r-cran-zelig-5.1.6.1/debian/tests/run-unit-test-6-if [ "$AUTOPKGTEST_TMP" = "" ] ; then
r-cran-zelig-5.1.6.1/debian/tests/run-unit-test:7:  AUTOPKGTEST_TMP=`mktemp -d /tmp/${pkg}-test.XXXXXX`
r-cran-zelig-5.1.6.1/debian/tests/run-unit-test-8-  trap "rm -rf $AUTOPKGTEST_TMP" 0 INT QUIT ABRT PIPE TERM