VarSwap(VarSwapPrice)
VarSwap()所属R语言包:VarSwapPrice
Pricing a variance swap of an equity index
股票指数的方差掉期定价
译者:生物统计家园网 机器人LoveR
描述----------Description----------
This routine prices a swap contract on the realized variance of the daily returns for an equity index. The code computes the portfolio of European-style put and call options used for calculating the cost of capturing realized variance in the presence of implied volatility skew with a discrete set of options strikes. The pricing method used in the code is proposed by Demeterfi, Derman, Kamal and Zou (1999).
这个例程的价格上实现股票指数的日收益率方差掉期合约。的代码计算投资组合的欧式认沽及认购期权,用于计算成本的捕捉实现差异存在的隐含波动偏态与一组离散的选项罢工。在代码中使用的定价方法,德曼,Demeterfi,Kamal和邹(1999)提出的。
用法----------Usage----------
VarSwap(S, puts, calls, vol_put, vol_call, r, T, SQ)
参数----------Arguments----------
参数:S
spot price
现货价格
参数:puts
vector of available put strike price
矢量可用的认沽行使价
参数:calls
vector of available call strike price
矢量可用的呼叫行使价
参数:vol_put
vector of implied volatilities for put contracts
矢量认沽合约的隐含波动率
参数:vol_call
vector of implied volatilities for call contracts
向量的呼叫合约的隐含波动率
参数:r
risk-free interest rate
无风险利率
参数:T
time to maturity
距到期日时间
参数:SQ
strike price that is nearest to forward price
行使价是最接近远期价格
Details
详细信息----------Details----------
Variance swaps forward contracts on future realised variance. They can be used to speculate on future variance levels or to hedge the variance exposure of other positions. Demeterfi, Derman, Kamal and Zou (1999) show that variance swaps can be theoretically replicated by a portfolio of standard options with suitably chosen strikes. The basic assumption is that the underlying stock index has no jumps. The fair value of the variance swap is the cost of the replicating portfolio. Demeterfi, Derman, Kamal and Zou (1999) obtain analytical formulas for a theoretical fair value with volatility skews.
方差掉期,远期合约未来实现差异。它们可以被用来推测未来的方差水平,或为对冲其他职位的方差曝光。 Demeterfi,德曼,Kamal和邹(1999年)显示,方差掉期理论上可以复制,组合的标准选项,选择合适的罢工。标的指数成份股的基本假设是,有没有跳跃。方差掉期的公允价值是复制组合的成本。 Demeterfi,德曼,Kamal和邹(1999)解析公式的理论公允价值的波动性倾斜。
值----------Value----------
参数:fairvol
analytical estimate of fair volatility
分析估计公平波动
参数:fairprice
fair rate for variance swap, obtained from equation (27) of Demeterfi, Derman, Kamal and Zou (1999)
公平率的方差掉期,获得了从方程(27)的Demeterfi,德曼,Kamal和邹(1999)
参数:total_cost
total weighted cost of portfolio of European options replicating the theoretical variance swap
加权总成本的欧式期权组合复制的理论方差掉期
参数:puts_strikes
strike prices of (discretely-sampled) put options available in the market
认沽期权行使价(离散采样)可以在市场上
参数:puts_vols
implied volatility of each put option available in the market (multiplied by 100)
每个在市场上的认沽期权的隐含波动率(乘以100)
参数:puts_weight
weights of each put option contract in the replication strategy (multiplied by 10000)
每一个认沽期权合约在复制策略的权重(乘以10000)
参数:puts_vpo
value of each put option contract
每一个认沽期权合约价值的
参数:puts_cont
contribution of each put option strike level to the total cost of the replicating portfolio (multiplied by 10000)
每一个认沽期权行使水平的贡献的复制投资组合的总成本(乘以10000)
参数:calls_strikes
strike prices of (discretely-sampled) call options available in the market
(离散采样)的行使价认购期权可在市场
参数:cals_vols
implied volatility of each put option available in the market (multiplied by 100)
每个在市场上的认沽期权的隐含波动率(乘以100)
参数:calls_weight
weights of each call option contract in the replication strategy (multiplied by 10000)
各认购期权合约在复制策略的权重(乘以10000)
参数:calls_vpo
value of each put option contract
每一个认沽期权合约价值的
参数:calls_cont
contribution of each call option strike level to the total cost of the replicating portfolio (multiplied by 10000)
贡献的每一个看涨期权行使水平的复制投资组合的总成本(乘以10000)
(作者)----------Author(s)----------
Paolo Zagaglia, paolo.zagaglia@gmail.com
参考文献----------References----------
实例----------Examples----------
rm(list=ls())
S <- c(100) #spot price[现货价格]
puts <- matrix( seq(100,45,-5) ) #available put strike prices[可认沽行使价]
vol_put <- matrix( seq(0.2,0.3,0.01) ) #implied vols for puts[看跌期权的隐含波动率]
calls <- matrix( seq(100,140,5) ) #available call strike prices[可用的呼叫行使价]
vol_call <- matrix( seq(0.2,0.13,-0.01) ) #implied vols for calls[隐含波动率的呼叫]
r <- c( 0.05 ) #risk free rate[无风险利率]
T <- c( 90/365 ) #maturity of 3 months[3个月到期]
SQ <- c( 100 ) #strike price which is nearest to forward price[这是最近的远期价格行使价]
equity_varswap <- VarSwap(S, puts, calls, vol_put, vol_call, r, T, SQ)
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|