library(stats)
library(forecast)
# Create simulated data
n = 100
set.seed(42)
arma_values = arima.sim(n = n, model = list(ar = c(0.6), ma = c(0.5, -0.5)))
linear_model = 5 + 1:n
stock_data = arma_values + linear_model
future_time = 3
buy_values = seq(90, 110, length.out = 5)
CallOptionsOverStrikePrices(stock_data, future_time, buy_values)
Run the code above in your browser using DataLab