Description Usage Arguments Value Background References See Also Examples

Given a multivariate random variable *Y* with skew-elliptical
(SEC) distribution, compute the distribution
of a (possibly multivariate) marginal or the distribution
of an affine transformation *a + A'Y*.

1 2 | ```
affineTransSECdistr(object, a, A, name, compNames, drop=TRUE)
marginalSECdistr(object, comp, name, drop=TRUE)
``` |

`object` |
an object of class |

`a` |
a numeric vector with the length |

`A` |
a full-rank matrix with |

`name` |
an optional character string representing the name of the outcome distribution; if missing, one such string is constructed. |

`compNames` |
an optional vector of length |

`drop` |
a logical flag (default value: |

`comp` |
a vector formed by a subset of |

If `object`

defines the distribution of a SEC random
variable *Y*, `affineTransSECdistr`

computes the
distribution of *a+A'Y* and `marginalSECdistr`

computes the marginal
distribution of the `comp`

components. In both cases the returned
object is of class `SECdistrMv`

, except when `drop=TRUE`

operates, leading to an object of class `SECdistrUv`

.

These functions implement formulae given in Sections 5.1.4, 5.1.6 and 6.2.2 of the reference below.

Azzalini, A. with the collaboration of Capitanio, A. (2014).
*The Skew-Normal and Related Families*.
Cambridge University Press, IMS Monographs series.

`makeSECdistr`

, `extractSECdistr`

,
`SECdistrMv-class`

1 2 3 4 5 6 | ```
dp3 <- list(xi=1:3, Omega=toeplitz(1/(1:3)), alpha=c(3,-1,2), nu=5)
st3 <- makeSECdistr(dp3, family="ST", name="ST3", compNames=c("U", "V", "W"))
A <- matrix(c(1,-1,1, 3,0,-2), 3, 2)
new.st <- affineTransSECdistr(st3, a=c(-3,0), A=A)
#
st2 <- marginalSECdistr(st3, comp=c(3,1), name="2D marginal of ST3")
``` |

sn documentation built on April 25, 2018, 1:04 a.m.

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.