ipnts | R Documentation |
ipnts
calculates inverse cdf of the NTS distribution with parameters (\alpha, \theta, \beta, \gamma, \mu)
.
If only three parameters are given, it calculates inverse cdf of the standard NTS distribution with parameter (\alpha, \theta, \beta)
ipnts(u, ntsparam, maxmin = c(-10, 10), du = 0.01)
u |
Real value between 0 and 1 |
ntsparam |
A vector of the NTS parameters |
Inverse cdf of the NTS distribution. It is the same as qnts function.
Kim, Y. S. (2020) Portfolio Optimization on the Dispersion Risk and the Asymmetric Tail Risk https://arxiv.org/pdf/2007.13972.pdf
library("temStaR")
alpha <- 1.2
theta <- 1
beta <- -0.2
ntsparam <- c(alpha, theta, beta)
u <- seq(from = 0.01, to = 0.99, length.out = 99)
q <- ipnts(u, ntsparam)
plot(u,q,type = 'l')
alpha <- 1.2
theta <- 1
beta <- -0.2
gamma <- 0.3
mu <- 0.1
ntsparam <- c(alpha, theta, beta, gamma, mu)
u <- seq(from = 0.01, to = 0.99, length.out = 99)
q <- ipnts(u, ntsparam)
plot(x,q,type = 'l')
#Annual based parameters
alpha <- 1.2
theta <- 1
beta <- -0.2
gamma <- 0.3
mu <- 0.1
#scaling annual parameters to one day
dt <- 1/250 #one day
ntsparam <- c(alpha, theta, beta, gamma, mu, dt)
u <- seq(from = 0.01, to = 0.99, length.out = 99)
q <- ipnts(u, ntsparam)
plot(x,q,type = 'l')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.