Y <- c(1, 2, 3, 5, 8, 13, 21)
E <- 5
tau <- 1 # Example value, not used in the function
i <- 2
h <- 3
predictedSignatureY <- c(0.5, 1.5, 2.5, 3.5, 4.5)
predictedValues <- convertSignatureToValue(E, tau, Y, i, h, predictedSignatureY)
print(predictedValues)
Run the code above in your browser using DataLab