setCopulaType<- {cascsim}

Set copula type.

Description

Set copula type.

Usage

setCopulaType(this, ...) <- value

## S4 replacement method for signature 'CopulaObj,character'
setCopulaType(this) <- value

Arguments

this

Copula Object

...

Additional function arguments

value

The copula type

Examples

library(cascsim)
dist1<-new("Pareto",p1=20,p2=3)
dist2<-new("Normal",p1=5,p2=3,min=0,max=20,truncated=TRUE)
cop <- new("CopulaObj", param=c(0.5),marginal=list(dist1=dist1,dist2=dist2),dimension=2)
setCopulaType(cop) <- "joe"