# plot_2and1hist: Plots the bivariate histogram of two time series together... In trawl: Estimation and Simulation of Trawl Processes

## Description

Plots the bivariate histogram of two time series together with the univariate histograms

## Usage

 `1` ```plot_2and1hist(x, y) ```

## Arguments

 `x` vector of equidistant time series data `y` vector of equidistant time series data (of the same length as x)

## Details

This function plots the bivariate histogram of two time series together with the univariate histograms

no return value

## Examples

 ``` 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35``` ```#Plot a bivariate histogram of two samples from #independent standard normal random vectors #Fix the seed set.seed(1) plot_2and1hist(stats::rnorm(100,0,1),stats::rnorm(100,0,1)) ############################## #A more interesting example: #'#Simulate a bivariate negative binomial trawl process with exponential trawl #functions and plot the bivariate histogram #Parameters of the exponential trawls: lambda1 <- 1.2 lambda2 <- 1.5 #Parameters of the negative binomial marginal law: m1 <- 2.1 theta1 <- 0.9 a1 <- 27.3 m2 <- 2.3 theta2 <- 0.9 a2 <- 35.3 kappa12 <- m1 kappa1 <- 0 kappa2 <- m2 - kappa12 #Specify the time period and grid t <- 720 Delta <- 1 #Fix the seed set.seed(1) #Simulate the bivariate trawl process with common factor #and independent components ("dep") and negative binomial # marginal law. Both trawl functions are chosen as exponentials. simdata <- sim_BivariateTrawl(t, Delta, burnin=10,marginal ="NegBin", dependencetype="dep",trawl1 ="Exp", trawl2 ="Exp", kappa1=kappa1,kappa2=kappa2,kappa12=kappa12,a1=a1,a2=a2,lambda11=lambda1, lambda21 =lambda2) plot_2and1hist(simdata[,1],simdata[,2]) ```

trawl documentation built on Aug. 16, 2018, 5:04 p.m.