Last data update: 2014.03.03

R: This is the target function whose zero is searched to crete...
omega_rootR Documentation

This is the target function whose zero is searched to crete the inverse function of omega.

Description

This is the target function whose zero is searched to crete the inverse function of omega.

Usage

omega_root(x = 0.5, p0_v1 = 0.5, p0_v2 = 0.5, p00 = p0_v1 * p0_v2,
  correlation = NA)

Arguments

x

value of expected correlation between the corresponding Gaussian-distributed variables

p0_v1,p0_v2

probablity of no precipitatin occurences for the v1 and v2 time series respectively.

p00

probability of no precipitation occurence in both v1 and v2 simultanously returned by omega

correlation

numerical value. DEfault is NA. Binary correlation retured by omega when the argumet correlation=TRUE

Value

the value p00-omega(x=x,p0_v1=p0_v1,p0_v2=p0_v2) or correlation-omega(x=x,p0_v1=p0_v1,p0_v2=p0_v2) (if correlation is not NA)

Note

This function makes use of normal copula

Author(s)

Emanuele Cordano

See Also

normalCopula,pcopula,omega,omega_inv

Examples

rho <- 0.4
p00 <- omega(x=rho,p0_v1=0.5,p0_v2=0.5)
omega_root(x=rho,p0_v1=0.5,p0_v2=0.5,p00=p00)

Results


R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(RGENERATEPREC)
Loading required package: copula
Loading required package: RGENERATE
Loading required package: RMAWGEN
Loading required package: chron
Loading required package: date
Loading required package: vars
Loading required package: MASS
Loading required package: strucchange
Loading required package: zoo

Attaching package: 'zoo'

The following objects are masked from 'package:base':

    as.Date, as.Date.numeric

Loading required package: sandwich
Loading required package: urca
Loading required package: lmtest

Attaching package: 'vars'

The following object is masked from 'package:copula':

    A

Loading required package: blockmatrix
Loading required package: Matrix
Loading required package: stringr

Attaching package: 'stringr'

The following object is masked from 'package:strucchange':

    boundary

> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/RGENERATEPREC/omega_root.Rd_%03d_medium.png", width=480, height=480)
> ### Name: omega_root
> ### Title: This is the target function whose zero is searched to crete the
> ###   inverse function of 'omega'.
> ### Aliases: omega_root
> 
> ### ** Examples
> 
> rho <- 0.4
> p00 <- omega(x=rho,p0_v1=0.5,p0_v2=0.5)
> omega_root(x=rho,p0_v1=0.5,p0_v2=0.5,p00=p00)
[1] 0
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>