| /dports/math/R-cran-deldir/deldir/R/ |
| H A D | plot.deldir.R | 149 dotargs <- list(...) list
150 if(is.null(dotargs$col)) dotargs$col <- cmpnt_col[1]
151 if(is.null(dotargs$lty)) dotargs$lty <- cmpnt_lty[1]
156 dotargs <- list(...)
157 if(is.null(dotargs$col)) dotargs$col <- cmpnt_col[2]
158 if(is.null(dotargs$lty)) dotargs$lty <- cmpnt_lty[2]
163 dotargs <- list(...)
164 dotargs$pch <- NULL
165 dotargs$cex <- NULL
172 dotargs$ces <- NULL
[all …]
|
| H A D | plot.divchain.R | 3 dotargs <- list(...) list
4 bty <- dotargs$bty
5 bxc <- dotargs$boxcol
6 dotargs$boxcol <- NULL
13 do.call(title,dotargs)
16 do.call(segments, c(as.list(unname(x[i, 1:4])), dotargs))
|
| /dports/math/R-cran-robustbase/robustbase/R/ |
| H A D | anova.lmrob.R | 3 dotargs <- list(...) list
4 named <- if (is.null(names(dotargs)))
5 logical(length(dotargs))# FALSE
6 else (names(dotargs) != "")
10 pasteK(deparse(dotargs[named])))
11 dotargs <- dotargs[!named]
16 if (length(dotargs) > 0) {
23 modform <- dotargs
29 dotargs <- c(list(object), dotargs)[order(h, decreasing = TRUE)]
30 object <- dotargs[[1]]
[all …]
|
| H A D | anova-glmrob.R | 5 dotargs <- list(...) list
6 if (!is.null(names(dotargs))) {
7 named <- (names(dotargs) != "")
11 pasteK(deparse(dotargs[named])))
12 dotargs <- dotargs[!named]
15 is.glmrob <- vapply(dotargs, inherits, NA, what="glmrob")
19 if (length(dotargs) > 0)
20 anovaGlmrobList(c(list(object), dotargs), test=test)
|
| /dports/math/R-cran-geepack/geepack/R/ |
| H A D | geeglm-anova.R | 123 dotargs <- list(...) list
124 named <- if (is.null(names(dotargs)))
125 rep(FALSE, length(dotargs))
126 else (names(dotargs) != "")
129 paste(deparse(dotargs[named]), collapse = ", "))
130 dotargs <- dotargs[!named]
131 is.glm <- unlist(lapply(dotargs, function(x) inherits(x, "glm")))
132 dotargs <- dotargs[is.glm]
134 if (length(dotargs) > 0)
135 return(anova.geeglmlist(c(list(object), dotargs), dispersion = dispersion,
|
| /dports/math/R-cran-raster/raster/R/ |
| H A D | mosaic.R | 15 dotargs <- x[ !isRast ] functionVar
18 if (is.null(dotargs$datatype)) {
19 dotargs$datatype <- .commonDataType(sapply(x, dataType))
22 dotargs$filename <- filename
74 dotargs$x <- out
75 out <- do.call(writeRaster, dotargs)
93 pb <- pbCreate(tr$n, dotargs$progress, label='mosaic')
95 dotargs$x <- out
96 out <- do.call(writeStart, dotargs)
|
| H A D | merge.R | 46 dotargs <- x[ !isRast ] functionVar
51 if (is.null(dotargs$datatype)) {
55 dotargs$filename <- filename
126 dotargs$x <- out
144 dotargs$x <- out
180 dotargs$x <- out
194 dotargs$x <- out
223 dotargs$x <- out
224 out <- do.call(writeStart, dotargs)
347 dotargs$x <- out
[all …]
|
| /dports/finance/R-cran-PerformanceAnalytics/PerformanceAnalytics/R/ |
| H A D | chart.RollingPerformance.R | 65 dotargs <-list(...) list
66 funargsmatch = pmatch(names(dotargs), names(formals(FUN)), nomatch = 0L)
67 funargs = dotargs[funargsmatch>0L]
71 plotargs = dotargs[funargsmatch==0L]
|
| H A D | chart.Correlation.R | 63 dotargs <- list(...) list
64 dotargs$method <- NULL
|
| /dports/math/R-cran-VGAM/VGAM/R/ |
| H A D | anova.vglm.q | 132 dotargs <- list(...) list
133 named <- if (is.null(names(dotargs)))
134 rep_len(FALSE, length(dotargs)) else
135 (names(dotargs) != "")
139 paste(deparse(dotargs[named]), collapse = ", "))
142 dotargs <- dotargs[!named]
143 is.vglm <- vapply(dotargs, function(x) is(x, "vglm"), NA)
144 dotargs <- dotargs[is.vglm]
145 if (length(dotargs))
146 return(anova.vglmlist(c(list(object), dotargs),
|
| /dports/math/R/R-4.1.2/src/library/stats/R/ |
| H A D | glm.R | 417 dotargs <- list(...) list
418 named <- if (is.null(names(dotargs)))
419 rep_len(FALSE, length(dotargs)) else (names(dotargs) != "")
422 paste(deparse(dotargs[named]), collapse=", "))
423 dotargs <- dotargs[!named]
424 is.glm <- vapply(dotargs,function(x) inherits(x,"glm"), NA)
425 dotargs <- dotargs[is.glm]
429 if (length(dotargs))
430 return(anova.glmlist(c(list(object), dotargs),
|
| /dports/math/libRmath/R-4.1.1/src/library/stats/R/ |
| H A D | glm.R | 417 dotargs <- list(...) list
418 named <- if (is.null(names(dotargs)))
419 rep_len(FALSE, length(dotargs)) else (names(dotargs) != "")
422 paste(deparse(dotargs[named]), collapse=", "))
423 dotargs <- dotargs[!named]
424 is.glm <- vapply(dotargs,function(x) inherits(x,"glm"), NA)
425 dotargs <- dotargs[is.glm]
429 if (length(dotargs))
430 return(anova.glmlist(c(list(object), dotargs),
|
| /dports/graphics/py-pygraphviz/pygraphviz-1.6/pygraphviz/ |
| H A D | agraph.py | 1362 dotargs = shlex.split(cmd)
1364 dotargs,
|