/dports/textproc/R-cran-openxlsx/openxlsx/R/ |
H A D | loadWorkbook.R | 190 for (i in seq_along(sheetrId)) { 369 for (i in seq_along(caches)) { 456 seq_along(extLinksXML) 495 for (i in seq_along(worksheetsXML)) { 627 for (i in seq_along(tables)) { 737 for (i in seq_along(xml)) { 770 for (i in seq_along(xml)) { 809 for (i in seq_along(xml)) { 868 for (i in seq_along(xml)) { 902 for (i in seq_along(xml)) { [all …]
|
H A D | build_workbook.R | 96 params[["sheetName"]] <- params[["sheetName"]] %||% names(x) %||% paste0("Sheet ", seq_along(x)) 135 for (i in seq_along(wb[["worksheets"]])) { 140 cols = seq_along(x[[i]]) + params[["startCol"]][[i]] - 1L, 147 cols = seq_along(x[[i]]) + params[["startCol"]][[i]] - 1L,
|
/dports/devel/R-cran-pkgload/pkgload/tests/testthat/ |
H A D | test-extraction.R | 5 for (i in seq_along(a)) { 24 expect_equal(extract_lang(body(f), comp_lang, quote(seq_along(a))), 25 quote(seq_along(a))) 36 expect_equal(extract_lang(body(f), comp_lang, quote(for (i in seq_along(a)) NULL), 1:3), 37 quote(for (i in seq_along(a)) { print(i) }))
|
/dports/devel/R-cran-foreach/foreach/tests/testthat/ |
H A D | test_loadfactor.R | 8 foreach(i=seq_along(d$x), .combine='c') %do% { 10 foreach(i=seq_along(r)) %do% expect_equal(r[i], 11L) 12 foreach(i=seq_along(d$x), .combine='c') %do% { 14 foreach(i=seq_along(r)) %do% expect_equal(r[i], 11L)
|
/dports/math/R/R-4.1.2/src/library/stats/R/ |
H A D | loglin.R | 31 for (k in seq_along(margin)) { 40 conf[seq_along(tmp), k] <- tmp 72 for (i in seq_along(x)) { 78 for (k in seq_along(margin)) { 80 for (j in seq_along(terms)) 86 for (k in seq_along(margin)) 102 terms <- seq_along(df)[df > 0]
|
/dports/math/libRmath/R-4.1.1/src/library/stats/R/ |
H A D | loglin.R | 31 for (k in seq_along(margin)) { 40 conf[seq_along(tmp), k] <- tmp 72 for (i in seq_along(x)) { 78 for (k in seq_along(margin)) { 80 for (j in seq_along(terms)) 86 for (k in seq_along(margin)) 102 terms <- seq_along(df)[df > 0]
|
/dports/devel/R-cran-itertools/itertools/R/ |
H A D | writedf.R | 5 paste('X', seq_along(filenames), sep='.') 9 paste('X', seq_along(filenames), sep='.') 48 for (icol in seq_along(columndata)) { 92 for (i in seq_along(columndata)) { 107 columndata <- lapply(seq_along(filenames), opencol) 108 for (i in seq_along(filenames))
|
/dports/math/R-cran-lava/lava/R/ |
H A D | multipletesting.R | 47 closed.testing <- function(object,idx=seq_along(coef(object)),null=rep(0,length(idx)),...) { 51 for (i in seq_along(idx)) { 54 for (j in seq_along(pp)) { 61 for (k in seq_along(idx)) { 63 for (i in seq_along(idx)) {
|
/dports/devel/R-cran-Rdpack/Rdpack/R/ |
H A D | utils.R | 22 inew <- seq_along(y) 25 irem <- seq_along(x) 30 icom <- which( !(seq_along(x) %in% c(inew, irem)) ) # in both, x and y 44 for(i in seq_along(x)) 56 f <- function(x,y) length(x) > length(y) && all( x[seq_along(y)] == y ) 60 for(i in seq_along(verb)){ 61 for(j in seq_along(eqn)){ 123 for(i in seq_along(wrk)) 143 for(i in seq_along(b)){ 223 indx <- c(rbind(seq_along(x), length(x) + 1))
|
/dports/misc/R-cran-xfun/xfun/tests/test-cran/ |
H A D | test-markdown.R | 13 out = seq_along(x) 23 out = seq_along(x) 28 out = seq_along(x) 47 out = seq_along(x)
|
/dports/devel/R-cran-bit64/bit64/R/ |
H A D | highlevel64.R | 787 o <- seq_along(x) 803 o <- seq_along(x) 1589 o <- seq_along(s) 1599 o <- seq_along(s) 1694 o <- seq_along(s) 1790 o <- seq_along(s) 1800 o <- seq_along(s) 1955 o <- seq_along(x) 1967 o <- seq_along(x) 2492 o <- seq_along(s) [all …]
|
/dports/math/R-cran-sf/sf/R/ |
H A D | sp.R | 239 as_Spatial = function(from, cast = TRUE, IDs = paste0("ID", seq_along(from))) { 250 .as_Spatial = function(from, cast = TRUE, IDs = paste0("ID", seq_along(from))) { 287 sfc2SpatialLines = function(from, IDs = paste0("ID", seq_along(from))) { 294 for (i in seq_along(from)) 299 sfc2SpatialPolygons = function(from, IDs = paste0("ID", seq_along(from))) { 305 lapply(seq_along(y), function(i) sp::Polygon(y[[i]], i > 1))), 308 sp::Polygons(lapply(seq_along(x), function(i) sp::Polygon(x[[i]], i > 1)), "ID")) 312 for (i in seq_along(from)) { 326 for (i in seq_along(l)) {
|
/dports/graphics/R-cran-ggplot2/ggplot2/R/ |
H A D | facet-grid-.r | 176 facets[seq_along(facets_list)] <- facets_list 366 … axes$x$top, 1, panel_pos_col$l, clip = "off", name = paste0("axis-t-", seq_along(axes$x$top)), z … 367 …s$x$bottom, -1, panel_pos_col$l, clip = "off", name = paste0("axis-b-", seq_along(axes$x$bottom)),… 368 …xes$y$left, panel_pos_rows$t, 1, clip = "off", name = paste0("axis-l-", seq_along(axes$y$left)), z… 369 …s$y$right, panel_pos_rows$t, -1, clip = "off", name = paste0("axis-r-", seq_along(axes$y$right)), … 393 …trips$x$top, 2, panel_pos_col$l, clip = "on", name = paste0("strip-t-", seq_along(strips$x$top)), … 397 …trips$x$top, 1, panel_pos_col$l, clip = "on", name = paste0("strip-t-", seq_along(strips$x$top)), … 406 …ips$y$left, panel_pos_rows$t, 2, clip = "on", name = paste0("strip-l-", seq_along(strips$y$left)),… 410 …ips$y$left, panel_pos_rows$t, 1, clip = "on", name = paste0("strip-l-", seq_along(strips$y$left)),… 417 …s$y$right, panel_pos_rows$t, -2, clip = "on", name = paste0("strip-r-", seq_along(strips$y$right))… [all …]
|
/dports/math/R-cran-sets/sets/R/ |
H A D | power.R | 6 as.set(unlist(lapply(seq_along(x), 20 unlist(lapply(seq_along(x), 33 unlist(lapply(seq_along(x),
|
H A D | plot.R | 57 for (i in seq_along(l)) 90 seq_along(universe) 123 for (i in seq_along(l)) 144 for (i in seq_along(l)) 181 seq_along(y) >= sup[1] & 182 seq_along(y) <= sup[2]
|
/dports/databases/R-cran-DBI/DBI/R/ |
H A D | interpolate.R | 40 for (c in seq_along(comments)) { 44 for (q in seq_along(quotes)) { 62 for (q in seq_along(quotes)) { 72 for (c in seq_along(comments)) {
|
/dports/devel/R-cran-pillar/pillar/R/ |
H A D | multi.R | 101 idx <- seq_along(x_list) 137 return(new_colonnade_squeezed(list(), colonnade = x, extra_cols = seq_along(x$data))) 157 indexes <- split(seq_along(col_widths_shown$tier), col_widths_shown$tier) 358 id <- seq_along(max_widths) 438 for (i in seq_along(widths)) { 459 data_frame(id = seq_along(widths), tier = tier, width = widths, offset_after = offset_after) 464 ret[2:4] <- ret[rev(seq_along(widths)), 2:4] 468 splits <- unname(split(seq_along(tier), tier)) 469 tier_widths <- tier_widths[seq_along(splits)] 493 tier_widths <- tier_widths[seq_along(col_widths_split)]
|
/dports/math/R-cran-spdep/spdep/R/ |
H A D | dnearneigh.R | 90 z <- lapply(seq_along(z), function(i) setdiff(z[[i]], z1[[i]])) 92 z <- lapply(seq_along(z), function(i) 133 z <- lapply(seq_along(z), 148 z1 <- lapply(seq_along(z1), 153 z <- lapply(seq_along(z), function(i) setdiff(z[[i]], z1[[i]])) 155 z <- lapply(seq_along(z), function(i) setdiff(z[[i]], i)) 156 z <- lapply(seq_along(z), function(i)
|
/dports/devel/R-cran-future/future/tests/ |
H A D | nested_futures.R | 38 for (kk in seq_along(plan_a)) attr(plan_a[[kk]], "init") <- NULL 39 for (kk in seq_along(nested_a)) attr(nested_a[[kk]], "init") <- NULL 85 for (kk in seq_along(x$plan_a)) attr(x$plan_a[[kk]], "init") <- NULL 86 for (kk in seq_along(nested)) attr(nested[[kk]], "init") <- NULL
|
/dports/math/R-cran-gtable/gtable/R/ |
H A D | gtable.r | 222 rows <- stats::setNames(seq_along(x$heights), rownames(x))[i] 223 cols <- stats::setNames(seq_along(x$widths), colnames(x))[j] 230 i <- seq_along(x$heights) %in% seq_along(x$heights)[rows] 231 j <- seq_along(x$widths) %in% seq_along(x$widths)[cols]
|
/dports/devel/R-cran-diffobj/diffobj/R/ |
H A D | hunks.R | 63 seq_along(sects), 200 c.all <- c.all[seq_along(hunk.limit[[2L]])] 357 for(k in seq_along(res.l)) { 396 for(i in seq_along(res.fin)) { 397 for(j in seq_along(res.fin[[i]])) { 439 line.id[l.gt.z.w] <- seq_along(l.gt.z.w) 441 line.id[l.lt.z.w] <- seq_along(l.lt.z.w) 453 seq_along(hunks), hunk_len, hunks=hunks, etc=etc, 518 for(j in seq_along(h.g)) { 600 for(i in seq_along(hunk.grps[[grp.cut]])) { [all …]
|
/dports/textproc/R-cran-xml2/xml2/R/ |
H A D | as_xml_document.R | 53 for (i in seq_along(attr)) { 57 for (i in seq_along(x)) { 75 for (i in seq_along(x)) {
|
/dports/math/R/R-4.1.2/src/library/tools/R/ |
H A D | Rd2ex.R | 73 for(i in seq_along(x)[-1]) ## `` i in 2:length(x) '' 98 for(i in seq_along(x[[2L]])) render(x[[2L]][[i]], prefix) 100 for(i in seq_along(x[[3L]])) render(x[[3L]][[i]], prefix) 102 for (i in seq_along(x)) 175 for (i in seq_along(ex)) render(ex[[i]])
|
/dports/math/libRmath/R-4.1.1/src/library/tools/R/ |
H A D | Rd2ex.R | 73 for(i in seq_along(x)[-1]) ## `` i in 2:length(x) '' 98 for(i in seq_along(x[[2L]])) render(x[[2L]][[i]], prefix) 100 for(i in seq_along(x[[3L]])) render(x[[3L]][[i]], prefix) 102 for (i in seq_along(x)) 175 for (i in seq_along(ex)) render(ex[[i]])
|
/dports/devel/RStudio/rstudio-2021.09.1-372/dependencies/common/rsconnect/R/ |
H A D | linters.R | 51 for (i in seq_along(matches)) { 57 for (j in seq_along(starts)) { 100 messages <- lapply(seq_along(from), function(regex) { 101 lapply(seq_along(regex), function(i) {
|