=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== r-cran-ade4-1.7-16/man/multispati.Rd-102- # compute Imin and Imax r-cran-ade4-1.7-16/man/multispati.Rd:103: L <- spdep::listw2mat(eval(as.list(obj$call)$listw)) r-cran-ade4-1.7-16/man/multispati.Rd-104- Imin <- min(eigen(0.5*(L+t(L)))$values) ############################################## r-cran-ade4-1.7-16/man/multispati.Rd-109- # draw the plot r-cran-ade4-1.7-16/man/multispati.Rd:110: xmax <- eval(as.list(obj$call)$dudi)$eig[1]*1.1 r-cran-ade4-1.7-16/man/multispati.Rd-111- par(las=1) ############################################## r-cran-ade4-1.7-16/R/bca.coinertia.R-119- sumry[1, ] <- c("$eig", length(x$eig), mode(x$eig), "Eigenvalues") r-cran-ade4-1.7-16/R/bca.coinertia.R:120: sumry[2, ] <- c("$lw", length(x$lw), mode(x$lw), paste("Row weigths (for ", eval(x$call[[2]])$call[[3]], " cols)", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:121: sumry[3, ] <- c("$cw", length(x$cw), mode(x$cw), paste("Col weigths (for ", eval(x$call[[2]])$call[[2]], " cols)", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R-122- ############################################## r-cran-ade4-1.7-16/R/bca.coinertia.R-126- sumry[1, ] <- c("$tab", nrow(x$tab), ncol(x$tab), "Crossed Table (CT)") r-cran-ade4-1.7-16/R/bca.coinertia.R:127: sumry[2, ] <- c("$li", nrow(x$li), ncol(x$li), paste("CT row scores (cols of ", eval(x$call[[2]])$call[[3]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:128: sumry[3, ] <- c("$l1", nrow(x$l1), ncol(x$l1), paste("CT normed row scores (cols of ", eval(x$call[[2]])$call[[3]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:129: sumry[4, ] <- c("$co", nrow(x$co), ncol(x$co), paste("CT col scores (cols of ", eval(x$call[[2]])$call[[2]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:130: sumry[5, ] <- c("$c1", nrow(x$c1), ncol(x$c1), paste("CT normed col scores (cols of ", eval(x$call[[2]])$call[[2]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:131: sumry[6, ] <- c("$lX", nrow(x$lX), ncol(x$lX), paste("Class scores (for ", eval(x$call[[2]])$call[[2]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:132: sumry[7, ] <- c("$mX", nrow(x$mX), ncol(x$mX), paste("Normed class scores (for ", eval(x$call[[2]])$call[[2]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:133: sumry[8, ] <- c("$lY", nrow(x$lY), ncol(x$lY), paste("Class scores (for ", eval(x$call[[2]])$call[[3]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:134: sumry[9, ] <- c("$mY", nrow(x$mY), ncol(x$mY), paste("Normed class scores (for ", eval(x$call[[2]])$call[[3]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:135: sumry[10, ] <- c("$lsX", nrow(x$lsX), ncol(x$lsX), paste("Row scores (rows of ", eval(x$call[[2]])$call[[2]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:136: sumry[11, ] <- c("$msX", nrow(x$msX), ncol(x$msX), paste("Normed row scores (rows of ", eval(x$call[[2]])$call[[2]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:137: sumry[12, ] <- c("$lsY", nrow(x$lsY), ncol(x$lsY), paste("Row scores (rows of ", eval(x$call[[2]])$call[[3]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:138: sumry[13, ] <- c("$msY", nrow(x$msY), ncol(x$msY), paste("Normed row scores (rows of ", eval(x$call[[2]])$call[[3]], ")", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:139: sumry[14, ] <- c("$aX", nrow(x$aX), ncol(x$aX), paste("Corr ", eval(x$call[[2]])$call[[2]], " axes / betcoi axes", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:140: sumry[15, ] <- c("$aY", nrow(x$aY), ncol(x$aY), paste("Corr ", eval(x$call[[2]])$call[[3]], " axes / betcoi axes", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:141: sumry[16, ] <- c("$acX", nrow(x$acX), ncol(x$acX), paste("Corr ", eval(x$call[[2]])$call[[2]], " coinertia axes / betcoi axes", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R:142: sumry[17, ] <- c("$acY", nrow(x$acY), ncol(x$acY), paste("Corr ", eval(x$call[[2]])$call[[3]], " coinertia axes / betcoi axes", sep="")) r-cran-ade4-1.7-16/R/bca.coinertia.R-143- ############################################## r-cran-ade4-1.7-16/R/plot.4thcorner.R-222- } else if(fctn=="fourthcorner.rlq"){ r-cran-ade4-1.7-16/R/plot.4thcorner.R:223: obj.rlq <- eval(appel$xtest, sys.frame(0)) r-cran-ade4-1.7-16/R/plot.4thcorner.R:224: type.axes <- eval(appel$typetest, sys.frame(0)) r-cran-ade4-1.7-16/R/plot.4thcorner.R-225- ############################################## r-cran-ade4-1.7-16/R/utilities.R-19- if (dudi.name == "dudi.pca") { r-cran-ade4-1.7-16/R/utilities.R:20: call.list$scale <- eval(call.list$scale) r-cran-ade4-1.7-16/R/utilities.R:21: call.list$center <- eval(call.list$center) r-cran-ade4-1.7-16/R/utilities.R-22-