Home
last modified time | relevance | path

Searched refs:zedd (Results 1 – 25 of 37) sorted by relevance

12

/dports/math/R-cran-VGAM/VGAM/R/
H A Dfamily.robust.R26 zedd <- (x - mu) / sigma functionVar
33 val[zedd < (-k)] <- (log(ceps) + log(fk) + ( k * (zedd+k)))[zedd < (-k)]
34 val[zedd > (+k)] <- (log(ceps) + log(fk) + (-k * (zedd-k)))[zedd > (+k)]
36 val <- (ceps) * dnorm(zedd)
37 val[zedd < (-k)] <- ((ceps) * fk * exp( k * (zedd + k)))[zedd < (-k)]
38 val[zedd > (+k)] <- ((ceps) * fk * exp(-k * (zedd - k)))[zedd > (+k)]
153 zedd <- (q - mu) / sigma functionVar
154 x <- -abs(zedd)
326 cond2 <- (abs(zedd) <= myk)
327 cond3 <- (zedd > myk)
[all …]
H A Dfamily.exp.R412 zedd <- (x - location) / scale functionVar
413 zedd[scale <= 0] <- NaN
434 zedd <- (q - location) / scale functionVar
435 zedd[scale <= 0] <- NaN
439 ans <- log(0.5) + log1p(zedd / sqrt(4 + zedd^2))
443 ans <- 0.5 * (1 + zedd / sqrt(4 + zedd^2))
449 ans <- log(0.5) + log1p(-zedd / sqrt(4 + zedd^2))
453 ans <- 0.5 * exp(log1p(-zedd / sqrt(4 + zedd^2)))
688 zedd <- (y - locat) / Scale functionVar
690 dl.dlocat <- 3 * zedd / (Scale * (4 + zedd^2))
[all …]
H A Dfamily.extremes.R555 A <- 1 + shape * zedd
1058 dA.dshape <- zedd
1161 logdensity <- -zedd - exp(-zedd) - log(scale)
1523 xok <- (!scase) & (zedd > 0) & (1 + shape*zedd > 0)
1526 outofbounds <- (!scase) & ((zedd <= 0) | (1 + shape*zedd <= 0))
1573 pos <- (zedd >= 0)
2541 ell1 <- -log(sc[cen0]) - zedd[cen0] - exp(-zedd[cen0])
2565 ezedd <- exp(-zedd)
2595 d2l.dsc2 <- (2 - zedd) * zedd * ezedd / sc^2
3089 temp200 <- dnorm(zedd) / (1-pnorm(zedd))
[all …]
H A Dprofilevglm.R129 zedd <- 0 functionVar
135 abs(zedd) < zmax) {
170 zedd <- sgn * sqrt(zee)
171 zi <- c(zi, zedd)
H A Dfamily.others.R1320 zedd <- (x - location) / scale functionVar
1326 logdensity[zedd > 0] <- log.s2[zedd > 0]
1342 zedd <- (q - location) / scale functionVar
1348 ans <- rep_len(0.0, length(zedd))
1349 ans[zedd <= 0] <- s1[zedd <= 0]
1350 ans[zedd > 0] <- s2[zedd > 0]
1544 zedd <- (y - mylocat) / myscale functionVar
1545 cond2 <- (zedd > 0)
1741 zedd <- (y - mylocat) / myscale functionVar
1742 cond2 <- (zedd > 0)
[all …]
H A Dwald0.R187 zedd <- zee # sgn * sqrt(zee) functionVar
188 signed.Lrt.0[kay] <- sqrt(zedd) *
190 Lrt.0[kay] <- zedd
H A Ds.vam.q13 s.vam <- function(x, zedd, wz, smomat, which, smooth.frame, bf.maxit = 10, argument
158 y = as.double(zedd), wz = as.double(wz),
193 dim(fit$y) <- dim(zedd)
194 dimnames(fit$y) <- dimnames(zedd)
H A Dfamily.normal.R675 zedd <- (y-mymu) / mysd functionVar
1861 ans <- exp(2 * (log(abs(zedd)) + dnorm(zedd, log = TRUE)) -
1883 zedd <- (y - mum) / sdm functionVar
1884 dl.dmu <- zedd / sdm
3034 zedd <- (y - mu) / sdev functionVar
3547 zedd <- y*alpha functionVar
3548 tmp76 <- pnorm(zedd)
3549 tmp86 <- dnorm(zedd)
3562 zedd <- ysim*alpha
3563 tmp76 <- pnorm(zedd)
[all …]
H A Drrvglm.fit.q280 bf.call <- expression(vlm.wfit(xmat = X.vlm.save, zedd,
289 zedd <- as.matrix(z) functionVar
291 zedd[, Index.corner] <- zedd[, Index.corner] - latvar.mat
293 zedd <- z
H A Dfamily.univariate.R5106 zedd <- (y - Loc) / Sca functionVar
5174 temp1 <- temp0 * zedd^2
5175 dl.dloc <- (Dof + 1) * zedd / (Sca * (Dof + zedd^2))
5407 zedd <- (y - Loc) / Sca functionVar
5476 dl.dlocat <- (Dof + 1) * zedd / (Sca * (Dof + zedd^2))
6877 zedd <- (y-a)/b functionVar
6879 dl.db <- (zedd * (exp(zedd) - k) - 1) / b
7288 zedd <- (q / scale)^d functionVar
9570 temp100 <- 1 + zedd
10657 ezedd <- exp(-zedd)
[all …]
H A Dfamily.aunivariate.R1744 zedd <- (x-mu)/sigma functionVar
1746 ifelse(abs(zedd) < smallno,
1748 log1p(-exp(-zedd^2/2)) - log(sqrt(2*pi)*sigma*zedd^2))
1750 ifelse(abs(zedd) < smallno,
1752 -expm1(-zedd^2/2)/(sqrt(2*pi)*sigma*zedd^2))
1782 zedd <- (q - mu)/sigma functionVar
1792 zedd[ii] <= 0.0) {
1919 zedd <- (y-mu)/sigma functionVar
1962 zedd <- (y - mu) / sigma functionVar
2016 zedd <- (y - mu) / sigma functionVar
[all …]
H A Dfamily.qreg.R34 zedd <- ((x/mu)^lambda - 1) / (lambda * sigma) functionVar
42 logden <- dnorm(zedd, log = TRUE) + log.dz.dy
252 z2m1 <- zedd * zedd - 1
254 dl.dlambda <- zedd * (zedd - log(y/mymu) / sigma) / lambda -
3118 zedd <- abs(ymat - locat) / Scale functionVar
3478 zedd <- abs(ymat-locat) / Scale functionVar
3663 zedd <- abs(y - locat) / Scale functionVar
3721 zedd <- (q - location) / scale functionVar
3739 ans <- ifelse(q < location, 0.5 * exp(zedd), 1 - 0.5 * exp(-zedd))
3746 ans <- ifelse(q < location, 1 - 0.5 * exp(zedd), 0.5 * exp(-zedd))
[all …]
H A Dfamily.rcim.R1320 zedd <- abs(qnorm((1 - conf.level) / 2)) functionVar
1321 lsd.tops <- estimates + zedd * QuasiSE / sqrt(2)
1322 lsd.tails <- estimates - zedd * QuasiSE / sqrt(2)
H A Dvsmooth.spline.q391 zedd.c <- matrix(0, neff, ncb)
399 zedd.c[ii, ] <- solve(Wmat.c[,, ii],
401 wzyb.c[ii, ] <- one.Wmat.c %*% zedd.c[ii, ]
H A Dcao.fit.q613 smooth.frame <- s.vam(x = nu1mat, zedd = NULL,
678 etamat = as.double(usethiseta), fv = double(NOS*n), zedd = double(n*M),
786 wresiduals = ans1$zedd - t(ans1$etamat), # n x M
887 smooth.frame <- s.vam(x = nu1mat, zedd = NULL, wz = NULL,
978 zedd = double(n*M),
1020 assign(".VGAM.CAO.z", ans1$zedd, envir = VGAMenv)
1071 wresiduals = ans1$zedd - t(ans1$etamat), # n x M
H A Dfamily.rrr.R359 M <- ncol(zedd <- as.matrix(z)) functionVar
371 zedd[,Index.corner] <- zedd[,Index.corner] - latvar.mat
383 zedd[, i5, drop = FALSE],
399 zedd, Hlist = clist2, U = U,
/dports/math/R-cran-VGAM/VGAM/man/
H A DbiamhcopUC.Rd62 zedd <- dbiamhcop(ox[, 1], ox[, 2], apar = apar)
64 contour(x, x, matrix(zedd, N, N), col = "blue")
65 zedd <- pbiamhcop(ox[, 1], ox[, 2], apar = apar)
66 contour(x, x, matrix(zedd, N, N), col = "blue")
H A DbifgmcopUC.Rd63 zedd <- dbifgmcop(ox[, 1], ox[, 2], apar = apar)
64 contour(x, x, matrix(zedd, N, N), col = "blue")
65 zedd <- pbifgmcop(ox[, 1], ox[, 2], apar = apar)
66 contour(x, x, matrix(zedd, N, N), col = "blue")
H A DbiplackettcopUC.Rd70 zedd <- dbiplackcop(ox[, 1], ox[, 2], oratio = oratio)
71 contour(x, x, matrix(zedd, N, N), col = "blue")
72 zedd <- pbiplackcop(ox[, 1], ox[, 2], oratio = oratio)
73 contour(x, x, matrix(zedd, N, N), col = "blue")
H A DbifrankcopUC.Rd68 zedd <- dbifrankcop(ox[, 1], ox[, 2], apar = apar)
69 contour(xx, xx, matrix(zedd, N, N))
70 zedd <- pbifrankcop(ox[, 1], ox[, 2], apar = apar)
71 contour(xx, xx, matrix(zedd, N, N))
H A DbinormcopUC.Rd82 zedd <- dbinormcop(ox[, 1], ox[, 2], rho = Rho, log = TRUE)
83 contour(x, x, matrix(zedd, N, N), col = "blue", labcex = 1.5)
84 zedd <- pbinormcop(ox[, 1], ox[, 2], rho = Rho)
85 contour(x, x, matrix(zedd, N, N), col = "blue", labcex = 1.5)
H A DbiclaytoncopUC.Rd98 zedd <- dbiclaytoncop(ox[, 1], ox[, 2], apar = Rho, log = TRUE)
100 contour(x, x, matrix(zedd, N, N), col = "blue", labcex = 1.5, las = 1)
H A DbistudenttUC.Rd119 zedd <- dbistudentt(ox[, 1], ox[, 2], df = mydf, rho = Rho, log = TRUE)
120 contour(x, x, matrix(zedd, N, N), col = "blue", labcex = 1.5) } }
H A Dbigamma.mckay.Rd127 mdata <- transform(mdata, zedd = rgamma(nn, shape = shape2, scale = scalepar))
128 mdata <- transform(mdata, y2 = y1 + zedd) # Z is defined as Y2-y1|Y1=y1
H A Dweightsvglm.Rd150 (zedd <- predict(fit) + wresid) # Adjusted dependent vector

12