contour_grid {GRIDCOPULA}

Draws the density / distribution function of a grid copula with contours and colors

Description

Draws the density / distribution function of a grid copula with contours and colors

Usage

  contour_grid(gc,
  FUN = "d.grid",
  color.name = "none",
  color.size = 7,
  show.points = FALSE,
  copula.domain = TRUE,
  normal.marginal = TRUE)

Arguments

gc

a grid type copula object.

FUN

the name of the function to be applied (d.grid for density, p.grid for distribution), default is 'd.grid'.

color.name

indicates the palette of colors

color.size

indicates the number of colors.

show.points

a logical value indicating if the data must be showed or not, default is FALSE.

copula.domain

Indicates whether it is going to be graphed in the domain of the copulas U(0,1) or in the domain of the original of the variables.

normal.marginal

Indicates whether the marginals should be taken as normal distributions. The default value is TRUE, otherwise the gaussian kernel is used as marginal distribution. This argument is neccesary only if the argument copula.domain is FALSE.

Value

Returns a graph of the density / distribution.

Examples

n <- 500
x <- rgamma(n,4,1/2)
e <- rnorm(n,0,.3)
y <- sin(x+e)
Fx <- ecdf(x)
Fy <- ecdf(y)
u <- Fx(x)
v <- Fy(y)
df <- cbind(u,v)
k <- 10
m <- 10
copula.grid <- estimate.gridCopula(U = df, k = k, m = m , method = "ml")
contour_grid(gc = copula.grid, FUN = 'd.grid', color.name = "rainbow")
contour_grid(gc = copula.grid, FUN = 'p.grid', color.name = "rainbow")

#Iris
copula.grid <- estimate.gridCopula(X = iris[,1:2], k = k, m = m , method = "ls")
contour_grid(gc = copula.grid, FUN = 'd.grid', color.name= "rainbow",
color.size = 10, copula.domain=FALSE)
contour_grid(gc = copula.grid, FUN = 'p.grid', color.name = "rainbow",
color.size = 10, copula.domain=FALSE)