/dports/finance/R-cran-vars/vars/R/ |
H A D | plot.varprd.R | 2 …("multiple", "single"), names = NULL, main = NULL, col = NULL, lty = NULL, lwd = NULL, ylim = NULL… argument 21 ifelse(is.null(lwd), lwd <- rep(1, 5), lwd <- rep(lwd, 5)[1:5]) 24 plotprd <- function(x, name, main, col, lty, lwd, ylab, xlab, ...){ argument 34 …main = main, ylab = ylab, xlab = xlab, ylim = ylim, col = col[1], lty = lty[1], lwd = lwd[1], ...) 35 lines(smply, col = col[2], lty = lty[2], lwd = lwd[2]) 36 lines(fcstl, col = col[3], lty = lty[3], lwd = lwd[3]) 37 lines(fcstu, col = col[4], lty = lty[4], lwd = lwd[4]) 38 abline(v = smpl, col = col[5], lty = lty[5], lwd = lwd[5]) 44 …plotprd(x = x, name = names[i], main = main[i], col = col, lty = lty, lwd = lwd, ylab = ylab[i], x… 53 …plotprd(x = x, name = names[i], main = main[i], col = col, lty = lty, lwd = lwd, ylab = ylab[i], x…
|
H A D | plot.varirf.R | 34 ifelse(is.null(lwd), lwd <- c(1, 1, 1, 1), lwd <- rep(lwd, 4)[1:4]) globalVar 82 if (!is.null(x$upper)) lines(x$upper[, rname], col = col[3], lty = lty[3], lwd = lwd[3]) 83 if (!is.null(x$lower)) lines(x$lower[, rname], col = col[3], lty = lty[3], lwd = lwd[3]) 84 abline(h = 0, col = col[2], lty = lty[2], lwd = lwd[2]) 110 if(!is.null(y)) lines(y[, i], col = col[3], lty = lty[3], lwd = lwd[3]) 111 if(!is.null(z)) lines(z[, i], col = col[3], lty = lty[3], lwd = lwd[3]) 122 if(!is.null(y)) lines(y[, j], col = col[3], lty = lty[3], lwd = lwd[3]) 123 if(!is.null(z)) lines(z[, j], col = col[3], lty = lty[3], lwd = lwd[3]) 131 … plot(xy, type = "l", ylab = ylabel, ylim = ylim, col = col[1], lty = lty[1], lwd = lwd[1], ...) 132 if(!is.null(y)) lines(y[, j], col = col[3], lty = lty[3], lwd = lwd[3]) [all …]
|
/dports/graphics/R-cran-colorspace/colorspace/R/ |
H A D | specplot.R | 238 lwd <- rep(lwd, length.out = 3L) 246 lines(RGB[, "R"], lwd = lwd[1L], lty = lty[1L], col = rgb[1L], type = type[1L], pch = pch[1L]) 247 lines(RGB[, "G"], lwd = lwd[2L], lty = lty[2L], col = rgb[2L], type = type[1L], pch = pch[1L]) 248 lines(RGB[, "B"], lwd = lwd[3L], lty = lty[3L], col = rgb[3L], type = type[1L], pch = pch[1L]) 250 …lines(yspec$RGB[, "R"], lwd = lwd[1L], lty = lty[1L] + 1L, col = rgb[1L], type = type[1L], pch = p… 251 …lines(yspec$RGB[, "G"], lwd = lwd[2L], lty = lty[2L] + 1L, col = rgb[2L], type = type[1L], pch = p… 255 ncol = 3L, bty = "n", lwd = lwd, lty = lty, col = rgb, pch = pch) 288 …lines((HCL[, "H"])/yrad, lwd = lwd[1L], lty = lty[1L], col = hcl[1L], type = type[1L], pch = pch[1… 296 lines(HCL[, "C"], lwd = lwd[2L], lty = lty[2L], col = hcl[2L], type = type[1L], pch = pch[1L]) 297 lines(HCL[, "L"], lwd = lwd[3L], lty = lty[3L], col = hcl[3L], type = type[1L], pch = pch[1L]) [all …]
|
/dports/math/R-cran-sandwich/sandwich/inst/doc/ |
H A D | sandwich-OOP.R | 19 rect(45, 90, 70, 110, lwd = 2, col = dgrey) 23 rect(20, 40, 40, 60, lwd = 2) 25 rect(5, 0, 20, 20, lwd = 2, col = lgrey) 26 rect(22.5, 0, 37.5, 20, lwd = 2, col = lgrey) 27 rect(40, 0, 55, 20, lwd = 2, col = lgrey) 28 rect(40, 0, 55, 20, lwd = 2, col = lgrey) 31 rect(60, 0, 80, 20, lwd = 2) 44 arrows(57.5, 89, 70, 21, lwd = 1.5, length = 0.15, angle = 20) 45 arrows(57.5, 89, 30, 61, lwd = 1.5, length = 0.15, angle = 20) 46 arrows(30, 39, 30, 21, lwd = 1.5, length = 0.15, angle = 20) [all …]
|
/dports/math/R-cran-raster/raster/R/ |
H A D | scalebar.R | 20 .oldscalebar <- function(object, xy=click(), length=100000, label='100 km', offset=0.3, lwd=4, ... … argument 30 lines(rbind(xy, xy2), lwd=lwd, ...) 84 lines(matrix(c(xy[1], xy[2], xy[1]+dd, xy[2]), byrow=T, nrow=2), lwd=lwd, ...) 92 adj <- c(0.5, -0.2-lwd/20 ) 103 lwd <- dd / 25 107 … graphics::polygon(c(xy[1], xy[1], half, half), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col='white') 108 …graphics::polygon(c(half, half, xy[1]+dd, xy[1]+dd ), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col='… 124 graphics::polygon(c(xy[1], xy[1], q1, q1), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col='white') 125 graphics::polygon(c(q1, q1, half, half), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col='black') 126 graphics::polygon(c(half, half, q3, q3 ), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col='white') [all …]
|
H A D | drawPoly.R | 8 drawPoly <- function(sp=TRUE, col='red', lwd=2, ...) { argument 9 xy <- graphics::locator(n=10000, type="l", col=col, lwd=lwd, ...) 12 lines(xy[(length(xy[,1])-1):length(xy[,1]),], col=col, lwd=lwd, ...) 21 drawLine <- function(sp=TRUE, col='red', lwd=2, ...) { argument 22 xy <- graphics::locator(n=10000, type="l", col=col, lwd=lwd, ...)
|
/dports/graphics/R-cran-diagram/diagram/R/ |
H A D | shadowbox.R | 7 shadow.col="grey", box.col="white", lcol="black", lwd=1, dr=0.01, argument 24 polygon(xy[, 1], xy[, 2], lwd=lwd, col=box.col, border=lcol, ...) 31 lwd=lwd, lcol=lcol, angle=angle, ...) 37 roundrect(mid, radx, rady, lwd=lwd, col=box.col, lcol=lcol, 51 polygon(xy[, 1], xy[, 2], lwd=lwd, col=box.col, border=lcol, ...) 58 dr=dr, lcol=lcol, lwd=lwd, angle=angle, ...) 64 filledmultigonal(mid=mid, rx=radx, ry=rady, col=box.col, lwd=lwd, 71 filledmultigonal(mid=mid, rx=radx, ry=rady, col=box.col, lwd=lwd, 90 polygon(xy[, 1], xy[, 2], lwd = lwd, col = box.col, border = lcol,
|
H A D | treearrow.R | 6 treearrow <- function(from, to, lwd=2, lty=1, lcol="black", argument 11 m1<<-rbind(m1, straightarrow (from=p1, to=p2, arr.pos=arr.pos, lwd=lwd, 13 segments(p1[1], p1[2], p2[1], p2[2], lwd=lwd, lty=lty, col=lcol) 30 segments(Line[1], m2, Line[2], m2, lwd=lwd, lty=lty, col=lcol) 38 segments(m2, Line[1], m2, Line[2], lwd=lwd, lty=lty, col=lcol)
|
/dports/math/R-cran-terra/terra/R/ |
H A D | lines.R | 13 function(x, y=NULL, col, lwd=1, lty=1, arrows=FALSE, ...) { argument 26 arrows(p1[,1], p1[,2], p2[,1], p2[,2], col=col, lwd=lwd, lty=lty, ...) 30 lines(cbind(a, b), col=col, lwd=lwd, lty=lty, ...) 33 points(x, col=col, type="l", lwd=lwd, lty=lty, ...) 37 lwd <- rep_len(lwd, n) 50 lines(x[[j]][,3:4], col=col[i], lwd=lwd[i], lty=lty[i], ...) 79 function(x, col, border="black", lwd=1, lty=1, ...) { argument 90 .plotPolygons(x, out, lwd=lwd, lty=lty, ...)
|
H A D | plot_scale.R | 22 sbar <- function(d, xy=NULL, type="line", divs=2, below="", lonlat=NULL, label, adj=c(0.5, -1), lwd… argument 62 lines(matrix(c(xy[1], xy[2], xy[1]+dd, xy[2]), byrow=T, nrow=2), lwd=lwd, xpd=xpd, ...) 70 adj <- c(0.5, -0.2-lwd/20 ) 86 lwd <- dd / 25 90 …graphics::polygon(c(xy[1], xy[1], half, half), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col="white",… 91 …graphics::polygon(c(half, half, xy[1]+dd, xy[1]+dd ), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col="… 107 …graphics::polygon(c(xy[1], xy[1], q1, q1), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col="white", xpd… 108 …graphics::polygon(c(q1, q1, half, half), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col="black", xpd=x… 109 …graphics::polygon(c(half, half, q3, q3 ), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col="white", xpd=… 110 …graphics::polygon(c(q3, q3, end, end), c(xy[2], xy[2]+lwd, xy[2]+lwd, xy[2]), col="black", xpd=xpd)
|
/dports/editors/neovim/neovim-0.6.1/test/functional/ex_cmds/ |
H A D | cd_spec.lua | 57 eq(0, lwd(globalwin)) 65 eq(0, lwd(globalwin)) 73 eq(0, lwd(globalwin)) 79 eq(1, lwd(localwin)) 99 eq(0, lwd(-1, 0)) 113 eq(1, lwd(-1, 0)) 114 eq(1, lwd(-1, localtab)) 119 eq(1, lwd(-1, localtab)) 126 eq(0, lwd(-1, -1)) 132 eq(0, lwd(-1, -1)) [all …]
|
/dports/devel/R-cran-Hmisc/Hmisc/R/ |
H A D | ecdf.s | 58 lwd <- rep(lwd, length=nlev) 86 lines(x,y, type="s", lty=lty[i], col=col[i], lwd=lwd[i]) 222 lwd = plot.line$lwd, define 300 dens.opts$lwd <- lwd 344 lwd <- rep(lwd, length = ng) 362 list(lwd=lwd, cex=cex[1]) 364 c(list(lwd=lwd, cex=cex[1]), label.curves) 371 lwd=lwd, lty=lty, pch=pch, cex=cex, 411 lines=list(col=col,lty=lty,lwd=lwd), 415 lines=list(col=col,lty=lty,lwd=lwd), [all …]
|
H A D | plsmo.s | 85 if(missing(lwd) && 87 length(label.curves$lwd)) 88 lwd <- label.curves$lwd 90 lwd <- rep(lwd, length=nlev) 94 gfun$lines(curves[[i]], lty=lty[i], col=col[i], lwd=lwd[i]) 115 lwd = superpose.line$lwd, define 134 lwd <- rep(lwd, length = ng) 149 list(lwd=lwd, cex=cex[1]) 151 } else c(list(lwd=lwd, cex=cex[1]), label.curves) 165 lwd=lwd, lty=lty, pch=pch, cex=cex, [all …]
|
H A D | xYplot.s | 65 lwd = plot.line$lwd, lty = plot.line$lty, define 90 lwd <- rep(lwd, length = ng) 226 gfun$lines(x, y, lwd = lwd, lty = lty, col = col, ...) 232 type = type, lwd=lwd, lty=lty, ...) 285 pspanel(x, y, subscripts, groups, lwd = lwd, lty = 292 else c(list(lwd = lwd, cex = cex[1]), label.curves) 350 lwd = dob(lwd.bands, lwd, ng, j), define 357 lwd = dob(lwd.bands, lwd, ng, j), define 383 lwd = lwd, lty = 1, col = col) define 553 lty=lty, lwd=lwd, other=NULL) [all …]
|
/dports/math/R/R-4.1.2/src/library/graphics/R/ |
H A D | matplot.R | 22 function(x, y, type = "p", lty = 1:5, lwd = 1, pch = NULL, col = 1:6, ...) argument 23 matplot(x = x, y = y, type = type, lty = lty, lwd = lwd, pch = pch, 27 function(x, y, type = "l", lty = 1:5, lwd = 1, pch = NULL, col = 1:6, ...) argument 28 matplot(x = x, y = y, type = type, lty = lty, lwd = lwd, pch = pch, 32 lty = 1:5, lwd = 1, lend = par("lend"), argument 101 if(length(lwd) < k && !is.null(lwd)) lwd <- rep_len(lwd, k) 113 xlim = xlim, ylim = ylim, lty = lty[1L], lwd = lwd[1L], 119 type = type[i], lty = lty[i], lwd = lwd[i],
|
/dports/math/libRmath/R-4.1.1/src/library/graphics/R/ |
H A D | matplot.R | 22 function(x, y, type = "p", lty = 1:5, lwd = 1, pch = NULL, col = 1:6, ...) argument 23 matplot(x = x, y = y, type = type, lty = lty, lwd = lwd, pch = pch, 27 function(x, y, type = "l", lty = 1:5, lwd = 1, pch = NULL, col = 1:6, ...) argument 28 matplot(x = x, y = y, type = type, lty = lty, lwd = lwd, pch = pch, 32 lty = 1:5, lwd = 1, lend = par("lend"), argument 101 if(length(lwd) < k && !is.null(lwd)) lwd <- rep_len(lwd, k) 113 xlim = xlim, ylim = ylim, lty = lty[1L], lwd = lwd[1L], 119 type = type[i], lty = lty[i], lwd = lwd[i],
|
/dports/converters/R-cran-base64enc/base64enc/src/ |
H A D | base64.c | 94 int lwd = 0, len = LENGTH(what), step; in B64_encode() local 99 lwd = asInteger(linewidth); in B64_encode() 100 if (lwd <= 0) lwd = 0; in B64_encode() 101 else if (lwd < 4) lwd = 4; /* there must be at least 4 chars per line */ in B64_encode() 102 lwd -= lwd & 3; in B64_encode() 103 step = lwd / 4 * 3; in B64_encode() 105 if (lwd == 0 || nl) { in B64_encode() 108 if (lwd && nll) slice += (slice / lwd + 1) * nll; in B64_encode() 113 if (lwd == 0 || len <= step) { /* easy, jsut call encode and out */ in B64_encode() 135 slice = lwd + 1; in B64_encode()
|
/dports/math/R-cran-FrF2/FrF2/R/ |
H A D | IAPlot.R | 178 points(c(-1),min(ax)+1/6*(max(ax)-min(ax)),pch=pch[2], cex=cex, lwd=lwd) nameattr 185 outer=TRUE, lwd=lwd) 187 cex.axis=cex.xax, outer=TRUE, lwd=lwd) 200 lty=3, pch=pch[1], cex=cex, lwd=lwd) 202 lines(c(-1,1),predmat[c(3,4),sp],lwd=lwd) nameattr 203 points(c(-1,1),predmat[c(3,4),sp],pch=pch[2], cex=cex, lwd=lwd) nameattr 206 if (i==1) axis(2, at = ax, labels = ax, cex.axis=cex.yax, outer=TRUE, lwd=lwd) 208 cex.axis=cex.xax, outer=TRUE, lwd=lwd) 219 col="red", lty=3, pch=pch[1], cex=cex, lwd=lwd) 221 lines(c(-1,1),predmat[c(2,4),sp],lwd=lwd) nameattr [all …]
|
H A D | cubedraw.R | 24 res3d$points3d(cub,cex=cex,pch=pch,lwd=3) ## points in top layer 33 res3d$points3d(xnullvis, cex = cex, type = 'l', lty = max,lwd=max) 34 res3d$points3d(ynullvis, cex = cex, type = 'l', lty = max,lwd=max) 35 res3d$points3d(znullvis, cex = cex, type = 'l', lty = max,lwd=max) 36 res3d$points3d(xnullinvis, cex = cex, type = 'l', lty = 3,lwd=max) 37 res3d$points3d(ynullinvis, cex = cex, type = 'l', lty = 3,lwd=max) 38 res3d$points3d(znullinvis, cex = cex, type = 'l', lty = 3,lwd=max) 42 res3d$points3d(xc, cex = cex, type = 'l', lty = 3,lwd=max) 43 res3d$points3d(yc, cex = cex, type = 'l', lty = 3,lwd=max) 44 res3d$points3d(zc, cex = cex, type = 'l', lty = 3,lwd=max) [all …]
|
/dports/graphics/R-cran-shape/shape/R/ |
H A D | filledcylinder.R | 7 col=femmecol(100), lcol=NA, lwd=2, lcolint=NULL, argument 8 ltyint=1, lwdint=lwd, mid=c(0,0), angle=0, delt =1.0, 54 lines(l1,col=lcol,lwd=lwd) 55 lines(l2,col=lcol,lwd=lwd) 59 lines(l1, col=lcolint, lwd=lwdint, lty=ltyint) 66 lines(l1,col=lcol,lwd=lwd) 67 lines(l2,col=lcol,lwd=lwd)
|
/dports/science/lammps/lammps-stable_29Sep2021/examples/COUPLE/lammps_spparks/ |
H A D | lmpspk.cpp | 141 lwd->file("data.lammps"); in main() 142 lwd->header("%d atoms",nglobal); in main() 143 lwd->header("%d atom types",nspins); in main() 144 lwd->header("%g %g xlo xhi",boxxlo,boxxhi); in main() 145 lwd->header("%g %g ylo yhi",boxylo,boxyhi); in main() 147 lwd->atoms(nlocal_spparks); in main() 148 lwd->atoms(id_spparks); in main() 149 lwd->atoms(spins); in main() 150 lwd->atoms(3,xyz); in main() 151 lwd->execute(); in main() [all …]
|
/dports/games/cataclysm-dda-tiles/Cataclysm-DDA-0.F/tools/graphs/ |
H A D | damage.r | 13 matplot(0:(length(d[[1]])-1),d, type='l', lty='solid', lwd=5, xlab='Range', ylab='Mean damage/shot'… 14 axis(side = 1, tck=-0.08, lwd=0, col='gray65', col.axis='gray10', lwd.ticks=2, mgp=c(0,2,0), font=2) 15 axis(side = 2, tck=-0.08, lwd=0, col='gray65', col.axis='gray10', lwd.ticks=2, mgp=c(0,2,0), font=2) 16 axis(side = 3, tck=-0.08, lwd=0, col='gray65', col.axis='gray10', lwd.ticks=2, labels=F) 17 axis(side = 4, tck=-0.08, lwd=0, col='gray65', col.axis='gray10', lwd.ticks=2, labels=F) 18 grid(NULL, NULL, lty = 'solid', lwd=2, col='gray65') 22 matplot(0:(length(d[[1]])-1),d, type='l', lty='solid', lwd=3, xlab='Range', ylab='Mean damage/shot'… 24 legend("topright", legend=colnames(d), inset=0.02, lwd=3, bg='gray90', box.lwd=0, text.col='gray10'…
|
/dports/games/cataclysm-dda/Cataclysm-DDA-0.F/tools/graphs/ |
H A D | damage.r | 13 matplot(0:(length(d[[1]])-1),d, type='l', lty='solid', lwd=5, xlab='Range', ylab='Mean damage/shot'… 14 axis(side = 1, tck=-0.08, lwd=0, col='gray65', col.axis='gray10', lwd.ticks=2, mgp=c(0,2,0), font=2) 15 axis(side = 2, tck=-0.08, lwd=0, col='gray65', col.axis='gray10', lwd.ticks=2, mgp=c(0,2,0), font=2) 16 axis(side = 3, tck=-0.08, lwd=0, col='gray65', col.axis='gray10', lwd.ticks=2, labels=F) 17 axis(side = 4, tck=-0.08, lwd=0, col='gray65', col.axis='gray10', lwd.ticks=2, labels=F) 18 grid(NULL, NULL, lty = 'solid', lwd=2, col='gray65') 22 matplot(0:(length(d[[1]])-1),d, type='l', lty='solid', lwd=3, xlab='Range', ylab='Mean damage/shot'… 24 legend("topright", legend=colnames(d), inset=0.02, lwd=3, bg='gray90', box.lwd=0, text.col='gray10'…
|
/dports/finance/R-cran-PerformanceAnalytics/PerformanceAnalytics/inst/doc/ |
H A D | PA-charts.R | 50 lwd=2,legend.loc="topleft", main="default") 51 chart.CumReturns(managers[,c(manager.col,peers.cols)],lwd=2, 53 chart.CumReturns(managers[,c(manager.col,peers.cols)],lwd=2, 55 chart.CumReturns(managers[,c(manager.col,peers.cols)],lwd=2, 62 charts.PerformanceSummary(managers[,c(manager.col,indexes.cols)], colorset=rich6equal, lwd=2, ylog=… 105 …ols, indexes.cols)], Rf=.03/12, colorset = c("red", rep("darkgray",5), "orange", "green"), lwd = 2) nameattr 111 …l, drop = FALSE], managers[ , c(peers.cols, 7)], colorset = tim8equal[-1], lwd = 2, legend.loc = "… 117 …nager.col, peers.cols) ], managers[, 8, drop=F], colorset = rainbow8equal, lwd = 2, legend.loc = "… 132 …peers.cols), drop = FALSE], managers[, 8, drop = FALSE], Rf = .03/12, colorset = redfocus, lwd = 2) 138 …ager.col, peers.cols)], managers[, 8, drop = FALSE], colorset = tim8equal, lwd = 2, main = "12-Mon…
|
/dports/math/R-cran-Rmpfr/Rmpfr/man/ |
H A D | log1mexp.Rd | 51 lwd <- 1.5*(5:2); col <- adjustcolor(1:4, 0.4) 53 matplot(a, fa, type = "l", log = "x", col=col, lwd=lwd) 54 legend("topleft", fExpr, col=col, lwd=lwd, lty=1:4, bty="n") 57 matplot(a, -fa, type = "l", log = "xy", col=col, lwd=lwd) 58 legend("left", paste("-",fExpr), col=col, lwd=lwd, lty=1:4, bty="n") 82 lty=1:3, lwd=2*(3:1)-1, col=adjustcolor(2:4, 1/3)) 83 legend("top", colnames(fa2)[1:3], lty=1:3, lwd=2*(3:1)-1, col=adjustcolor(2:4, 1/3)) 85 cols <- adjustcolor(2:4, 1/3); lwd <- 2*(3:1)-1 88 pch=21:23, cex=.6, bg=5:7, lty=1:2, lwd=lwd, col=cols) 89 legend("top", colnames(fa2)[1:3], bty="n", lty=1:2, lwd=lwd, col=cols,
|