/dports/math/R-cran-units/units/R/ |
H A D | plot.R | 80 if (is.null(xlab)) 81 xlab <- "Index" 84 return(NextMethod("plot", x, y, xlab=xlab, ylab=ylab)) 86 if (is.null(xlab)) 87 xlab <- xlab0 90 xlab <- make_unit_label(xlab, x) 93 NextMethod("plot", xlab=xlab, ylab=ylab) 112 if (is.null(xlab)) { 115 NextMethod("hist", xlab=xlab, main=main) 134 xlab <- lab [all …]
|
/dports/math/R/R-4.1.2/src/library/grDevices/R/ |
H A D | xyz.coords.R | 26 if(is.null(ylab)) ylab <- xlab 41 if(setLab) xlab <- "Time" 54 if(setLab) xlab <- "Index" 87 if(setLab) xlab <- "Index" 125 list(x=as.double(x), y=as.double(y), xlab=xlab, ylab=ylab) nameattr 152 if(setLab) xlab <- "Index" 163 xlab <- paste0(xlab,"[,1]") 181 xlab <- paste0(xlab,"$x") 200 xlab <- paste0("Re(", xlab, ")") 208 zlab <- xlab [all …]
|
/dports/math/libRmath/R-4.1.1/src/library/grDevices/R/ |
H A D | xyz.coords.R | 26 if(is.null(ylab)) ylab <- xlab 41 if(setLab) xlab <- "Time" 54 if(setLab) xlab <- "Index" 87 if(setLab) xlab <- "Index" 125 list(x=as.double(x), y=as.double(y), xlab=xlab, ylab=ylab) nameattr 152 if(setLab) xlab <- "Index" 163 xlab <- paste0(xlab,"[,1]") 181 xlab <- paste0(xlab,"$x") 200 xlab <- paste0("Re(", xlab, ")") 208 zlab <- xlab [all …]
|
/dports/math/R-cran-lava/lava/R/ |
H A D | fplot.R | 20 fplot <- function(x,y,z=NULL,xlab,ylab,...,z.col=topo.colors(64), argument 31 if (missing(xlab)) xlab <- "Index" 33 if (missing(xlab)) xlab <- x[1] 43 if (missing(xlab)) xlab <- "Index" 45 if (missing(xlab)) xlab <- deparse(substitute(x)) 53 rgl::plot3d(x,y,0,col=z.col[round(glut(z))],xlab=xlab,ylab=ylab,add=add,...) 55 rgl::plot3d(x,y,0,xlab=xlab,ylab=ylab,add=add,...)
|
/dports/x11-toolkits/lesstif/lesstif-0.95.2/test/extra/Xlab/ |
H A D | xlab.patch | 1 diff -cr xlab-980917/common.c xlab/common.c 3 --- xlab/common.c Fri Oct 2 10:17:12 1998 37 diff -cr xlab-980917/doc/xlab.man xlab/doc/xlab.man 38 *** xlab-980917/doc/xlab.man Sat Aug 15 03:32:29 1998 39 --- xlab/doc/xlab.man Fri Oct 2 10:17:12 1998 74 Only in xlab/doc: xlab.man.orig 75 diff -cr xlab-980917/record.c xlab/record.c 243 diff -cr xlab-980917/scope.c xlab/scope.c 299 diff -cr xlab-980917/scope.h xlab/scope.h 314 diff -cr xlab-980917/server.c xlab/server.c [all …]
|
H A D | README | 1 This directory contains scripts for testing based on the xlab program by 5 To use these scripts, first get the latest version of xlab from: 7 http://www.alphalink.com.au/~mvertes/download/xlab-980917.tar.gz 9 Untar the file and apply the patch file xlab.patch. The patch adds a "-e" 10 flag to xlab to tell it to automatically exit when the client does, and a 13 Configure, make, and install xlab. NOTE: Xlab currently doesn't work with 52 ./xlab/testXX.xcalls --> the recorded xcalls from xlab (also used 55 ./xlab/testXX.rxlog ---> xlab's text output log from recording; 58 ./xlab/testXX.rlog --> the text output of the program 63 ./xlab/testXX.pxlog ---> xlab's text output log from playback. [all …]
|
/dports/devel/R-cran-Hmisc/Hmisc/R/ |
H A D | histbackback.s | 2 function(x, y, brks = NULL, xlab = NULL, axes = TRUE, probability = FALSE, 5 if(length(xlab)) 6 xlab <- rep(xlab, length = 2) 12 if(!length(xlab)) 15 xlab <- namx[1:2] 18 xlab <- deparse(substitute(x)) 19 xlab <- paste(xlab, c("x", "y"), sep = "$") 25 else if(!length(xlab)) 26 xlab <- c(deparse(substitute(x)), deparse(substitute(y))) 90 title(xlab = xlab[1], adj = (-0.5 * xl[1])/( - xl[1] + xl[2])) [all …]
|
/dports/math/R-cran-gss/gss/R/ |
H A D | ssden1.R | 38 x <- mf[[xlab]] 44 quad[[xlab]] <- list(pt=unique(x),wt=rho[[xlab]]) 45 rho.log[[xlab]] <- log(rho[[xlab]]) 46 rho.int <- c(rho.int,sum(rho[[xlab]]*log(rho[[xlab]]))) 47 rho.int2 <- c(rho.int2,sum(rho[[xlab]]*(log(rho[[xlab]]))^2)) 56 else domain[[xlab]] <- c(min(domain[[xlab]]),max(domain[[xlab]])) 58 type[[xlab]] <- list("cubic",domain[[xlab]]) 61 type[[xlab]] <- list(type[[xlab]][[1]],domain[[xlab]]) 64 rho[[xlab]] <- ssden(form,data=mf,type=type[xlab], 85 rho[[xlab]] <- ssden(form,data=mf,type=type[xlab],quad=qd.wk, [all …]
|
/dports/finance/R-cran-vars/vars/R/ |
H A D | plot.varfevd.R | 2 …ingle"), names = NULL, main = NULL, col = NULL, ylim = NULL, ylab = NULL, xlab = NULL, legend = NU… argument 21 ifelse(is.null(xlab), xlab <- rep("Horizon", nv), xlab <- rep(xlab, nv)[1:nv]) 25 plotfevd <- function(x, main, col, ylab, xlab, names.arg, ylim, ...){ argument 30 …barplot(xvalue, main = main, col = col, ylab = ylab, xlab = xlab, names.arg = names.arg, ylim = yl… 34 …barplot(xvalue, main = main, col = col, ylab = ylab, xlab = xlab, names.arg = names.arg, ylim = yl… 42 …plotfevd(x = x[[names[i]]], main = main[i], col = col, ylab = ylab[i], xlab = xlab[i], names.arg =… 51 …plotfevd(x = x[[names[i]]], main = main[i], col = col, ylab = ylab[i], xlab = xlab[i], names.arg =…
|
H A D | plot.varprd.R | 2 …ain = NULL, col = NULL, lty = NULL, lwd = NULL, ylim = NULL, ylab = NULL, xlab = NULL, nc, mar = p… argument 23 ifelse(is.null(xlab), xlab <- rep("", nv), xlab <- rep(xlab, nv)[1:nv]) 24 plotprd <- function(x, name, main, col, lty, lwd, ylab, xlab, ...){ argument 34 …plot.ts(fcsty, main = main, ylab = ylab, xlab = xlab, ylim = ylim, col = col[1], lty = lty[1], lwd… 44 …e = names[i], main = main[i], col = col, lty = lty, lwd = lwd, ylab = ylab[i], xlab = xlab[i], ...) 53 …e = names[i], main = main[i], col = col, lty = lty, lwd = lwd, ylab = ylab[i], xlab = xlab[i], ...)
|
/dports/devel/R-cran-sfsmisc/sfsmisc/R/ |
H A D | p.res.2x.WSt.R | 18 xlab = NULL, ylab = NULL, main = NULL, argument 24 if(is.null(xlab)) xlab <- deparse(substitute(x)) 48 xlab = xlab, ylab = ylab, main = main, ...) 69 xlab = NULL, ylab = NULL, ...) argument 118 x <- t.d[,2]; if(is.null(xlab)) xlab <- names(t.d)[2] 121 p.res.2fact(x, y, z, main=main, xlab=xlab, ylab=ylab, ...) 125 p.res.2x.default(x,y,z, main=main, xlab=xlab, ylab=ylab, ...) 131 xlab = NULL, ylab = NULL, main = NULL) argument 133 if(is.null(xlab)) xlab <- deparse(substitute(x)) 165 xlab,"=",x[II],", ", ylab, "=",yv,"\n") [all …]
|
/dports/math/R-cran-coda/coda/R/ |
H A D | trellisplots.R | 74 xlab = xlab, ylab = ylab) 121 xlab = xlab, ylab = ylab) 182 xlab = xlab, 232 xlab = xlab, 241 xlab = xlab, 365 xlab = xlab, 418 xlab = xlab, 428 xlab = xlab, 502 xlab = xlab, 576 xlab = xlab, [all …]
|
/dports/finance/R-cran-strucchange/strucchange/R/ |
H A D | gefp.R | 163 xlab = NULL, ...) argument 167 if(is.null(xlab)) { 169 xlab <- "Time" 172 xlab <- unlist(strsplit(xlab, "$", fixed = TRUE)) 173 xlab <- xlab[length(xlab)] 223 if(plot) plot(scus, functional = functional, xlab = xlab, ...) 392 plot(proc, xlab = xlab, ylab = ylab, main = main, ylim = ylim, ...) 449 plot(proc, xlab = xlab, ylab = ylab, main = main, ylim = ylim, ...) 494 if(is.null(xlab)) xlab <- "Component" 531 if(is.null(xlab)) { [all …]
|
/dports/math/R-cran-VGAM/VGAM/R/ |
H A D | rootogramsubset.R | 26 width = NULL, xlab = NULL, ylab = NULL, main = NULL, argument 35 if (is.null(xlab)) { 36 xlab <- if (is.null(names(dimnames(object)))) { 80 attr(rval, "xlab") <- xlab 98 xlim = NULL, ylim = NULL, xlab = NULL, ylab = NULL, main = NULL, argument 114 if(is.null(xlab)) xlab <- TRUE 117 xlab <- rep(xlab, length.out = n) 120 if(is.logical(xlab)) xlab <- ifelse(xlab, attr(x, "xlab"), "") 139 xlab = xlab[j], ylab = ylab[j], main = main[j],
|
/dports/math/R/R-4.1.2/src/library/graphics/R/ |
H A D | sunflowerplot.R | 23 xlab = NULL, ylab = NULL, xlim = NULL, ylim = NULL, argument 40 xlab <- if (is.null(xlab)) xy$xlab else xlab 62 plot(x, y, xlab = xlab, ylab = ylab, 90 function(formula, data = NULL, xlab = NULL, ylab = NULL, ..., argument 98 m$xlab <- m$ylab <- m$... <- NULL 105 if(is.null(xlab)) xlab <- names(mf)[2L] 107 sunflowerplot(mf[[2L]], mf[[1L]], xlab = xlab, ylab = ylab, ...)
|
/dports/math/libRmath/R-4.1.1/src/library/graphics/R/ |
H A D | sunflowerplot.R | 23 xlab = NULL, ylab = NULL, xlim = NULL, ylim = NULL, argument 40 xlab <- if (is.null(xlab)) xy$xlab else xlab 62 plot(x, y, xlab = xlab, ylab = ylab, 90 function(formula, data = NULL, xlab = NULL, ylab = NULL, ..., argument 98 m$xlab <- m$ylab <- m$... <- NULL 105 if(is.null(xlab)) xlab <- names(mf)[2L] 107 sunflowerplot(mf[[2L]], mf[[1L]], xlab = xlab, ylab = ylab, ...)
|
/dports/finance/R-cran-fBasics/fBasics/R/ |
H A D | plot-acfPlot.R | 51 xlab = "lag" functionVar 54 main = xlab = ylab = "" 61 main = main, xlab = xlab, ylab = ylab, ...) 96 xlab = "lag" functionVar 99 main = xlab = ylab = "" 106 main = main, xlab = xlab, ylab = ylab, ...) 143 xlab = "Exponent Delta" functionVar 167 main = main, xlab = xlab, ylab = ylab, ...) 170 main = main, xlab = xlab, ylab = ylab, ...) 240 xlab = "tau" functionVar [all …]
|
/dports/math/R-cran-car/car/R/ |
H A D | densityPlot.R | 18 xlab=deparse(substitute(x)), ylab="Density", main="", argument 48 force(xlab) 56 if (show.bw) xlab <- paste(xlab, " (bandwidth = ", format(density$bw), ")", sep="") 57 plot(xlim, ylim, xlab=xlab, ylab=ylab, main=main, type="n") 93 plot(xlim, ylim, xlab=xlab, ylab=ylab, main=main, type="n") 113 densityPlot.formula <- function(formula, data=NULL, subset, na.action=NULL, xlab, ylab, main="", le… argument 117 m$legend <- m$xlab <- m$ylab <-m$main <- m$... <- NULL 133 if (missing(xlab)) xlab <- names(mf)[response] 135 densityPlot(mf[[response]], g, xlab=xlab, ylab=ylab, main=main, 139 if (missing(xlab)) xlab <- names(mf) [all …]
|
H A D | Ellipse.R | 67 plot(ellipse, type="n", xlab = xlab, ylab = ylab, ...) 123 if (missing(xlab)) xlab <- colnames(x)[1] 135 xlab 153 plot(x, y, type="n", xlab=xlab, ylab=ylab, ...) 180 plot(x, y, type="n", xlab=xlab, ylab=ylab, ...) 239 if (missing(xlab)) xlab <- paste(names(coef)[1], "coefficient") 246 xlab <- res$xlab 279 xlab <- if (missing(xlab)) paste(names(coef)[1], "coefficient") 285 xlab <- res$xlab 324 xlab <- names(coef)[1] functionVar [all …]
|
/dports/math/R-cran-wk/wk/R/ |
H A D | plot.R | 25 asp = 1, bbox = NULL, xlab = "", ylab = "", argument 46 xlab = xlab, 153 plot.wk_wkt <- function(x, ..., asp = 1, bbox = NULL, xlab = "", ylab = "", argument 160 xlab = xlab, 171 plot.wk_wkb <- function(x, ..., asp = 1, bbox = NULL, xlab = "", ylab = "", argument 178 xlab = xlab, 189 plot.wk_xy <- function(x, ..., asp = 1, bbox = NULL, xlab = "", ylab = "", add = FALSE) { argument 197 xlab = xlab, 223 xlab = xlab, 235 plot.wk_crc <- function(x, ..., asp = 1, bbox = NULL, xlab = "", ylab = "", argument [all …]
|
/dports/math/openturns/openturns-1.18/validation/src/optimal_lhs/ |
H A D | validate_SA_small.R | 12 plot(result$design, col="blue", xlab="", ylab="", main="LHS design of size = 10, optimization of C2… 15 plot(result$critValues,type="l", col='blue', xlab="Iterations", ylab="C2 criterion", main="C2 crite… 18 plot(result$probaValues,type="p", pch=".", xlab="Iterations", ylab="Probability", main="Probability… 21 plot(result$tempValues,type="l", col='red', xlab="Iterations", ylab="Temperature criterion", main="… 28 plot(result$design, col="blue", xlab="", ylab="", main="LHS design of size = 10, optimization of Mi… 31 plot(result$critValues,type="l", col='blue', xlab="Iterations", ylab="PhiP criterion", main="PhiP c… 34 plot(result$probaValues,type="p", pch=".", xlab="Iterations", ylab="Probability", main="Probability… 37 plot(result$tempValues,type="l", col='red', xlab="Iterations", ylab="Temperature criterion", main="…
|
/dports/math/R-cran-pls/pls/R/ |
H A D | plots.R | 264 if (missing(xlab)) xlab <- "observation" 268 if (missing(xlab)) xlab <- varlab[1] 271 plot(S, xlab = xlab, ylab = ylab, type = type, ...) 352 if (missing(xlab)) xlab <- "variable" 356 if (missing(xlab)) xlab <- varlab[1] 382 if (missing(xlab)) xlab <- "variable" 414 matplot(xnum, L, xlab = xlab, ylab = ylab, type = type, 518 if (missing(xlab)) xlab <- varlab[1] 521 xlab = xlab, ylab = ylab, type = type, col = col, ...) 784 xlab = xlab, ylab = ylab, ...) [all …]
|
/dports/math/R-cran-forecast/forecast/R/ |
H A D | armaroots.R | 43 plot.armaroots <- function(x, xlab, ylab, main, ...) { argument 51 xlab = xlab, ylab = ylab, 108 xlab = "Real", ylab = "Imaginary", ...) { argument 151 plot(arroots(x), main = main, xlab = xlab, ylab = ylab, ...) 154 plot(maroots(x), main = main, xlab = xlab, ylab = ylab, ...) 160 plot.ar <- function(x, main, xlab = "Real", ylab = "Imaginary", ...) { argument 164 plot(arroots(x), main = main, xlab = xlab, ylab = ylab, ...)
|
/dports/math/R-cran-survey/survey/R/ |
H A D | svycdf.R | 43 plot.svycdf<-function(x,xlab=NULL,...){ argument 44 if(is.null(xlab)) 45 xlab<-names(x) 46 else if (length(xlab)==1) 47 xlab<-rep(xlab,length(names(x))) 49 for (i in 1:length(x)) plot(x[[i]], xlab =xlab[i], ...)
|
/dports/math/R-cran-psych/psych/R/ |
H A D | multi.hist.R | 15 xlab=names(x)[i] #get the names for the variables functionVar 16 if(density) {histo.density(x[,i],xlab=xlab,main=main,freq=freq,...)} else { 17 hist(x[,i],main=main,xlab=xlab,freq=freq,...)} 23 function(x,main="Histogram, Density, and Normal Fit",freq=FALSE,xlab=NULL,...) { argument 32 plot(h,freq=freq,ylim=c(0,ymax*1.2),main=main,xlab=xlab,...) nameattr
|