protectiveCallExpirationValueVT {bearishTrader} | R Documentation |
Calculates the Value/Payoff per share at expiration for Protective Call and draws its graph in the Plots tab.
Description
This strategy is also known as married call or synthetic put or a protected short sale. It consists of a call purchase against a short sale of the underlying stock. An increase in the price of the stock over the strike price of the call will prompt the investor to exercise the right to buy the stock. As a result, the investor is protected against an increase in the stock price over the strike price (Kakushadze & Serur, 2018).
Usage
protectiveCallExpirationValueVT(
ST,
X,
C,
S0,
hl = 0,
hu = 1.5,
xlab = "Spot Price ($) at Expiration",
ylab = "Value / Payoff [ VT ] at Expiration ($)",
main = "Protective Call / Married Call / SyntheticPut [VT]"
)
Arguments
ST |
Spot Price at time T. |
X |
Strike Price or eXercise price. |
C |
Call Premium. |
S0 |
Initial Stock Price. |
hl |
lower bound value for setting lower-limit of x-axis displaying spot price. |
hu |
upper bound value for setting upper-limit of x-axis displaying spot price. |
xlab |
X-axis label. |
ylab |
Y-axis label. |
main |
Title of the Graph. |
Details
According to conceptual details given by Cohen (2015), and a closed-form solution provided by Kakushadze and Serur (2018), this method is developed, and the given examples are created, to compute the Value/Payoff per share at expiration for Protective Call and draw its graph in the Plots tab. EXAMPLE, Short HypoMedia stock at $14.00 (inflow) and buy HypoMedia December 15 call at $2.00 (outflow).
Value
Returns a graph of the strategy.
Author(s)
MaheshP Kumar, maheshparamjitkumar@gmail.com
References
Cohen, G. (2015). The Bible of Options Strategies (2nd ed.). Pearson Technology Group. https://bookshelf.vitalsource.com/books/9780133964448
Kakushadze, Z., & Serur, J. A. (2018, August 17). 151 Trading Strategies. Palgrave Macmillan. https://papers.ssrn.com/sol3/papers.cfm?abstract_id=3247865
Examples
protectiveCallExpirationValueVT(15,15,2,14)
protectiveCallExpirationValueVT(50,50,3,48,hl=0.8,hu=1.2)
protectiveCallExpirationValueVT(1000,1000,4,998,hl=0.98,hu=1.01)