bugfix

ahudde · Aug 31, 2023 · 970ae63 · 970ae63
1 parent 4191ac1
commit 970ae63
Show file tree

Hide file tree

Showing 4 changed files with 11 additions and 6 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: greeks
 Title: Sensitivities of Prices of Financial Options and Implied Volatilites
-Version: 1.2.0
+Version: 1.2.1
 Authors@R: 
     person(given = "Anselm",
            family = "Hudde",

diff --git a/R/Greeks_UI.R b/R/Greeks_UI.R
@@ -409,7 +409,13 @@ Greeks_UI <- function() {
           unlist() %>%
           unname()
 
-        x_bounds <- input[[eval(paste(params_list[[input$x_axis]], "_2", sep = ""))]]
+        if (input$option_type == "Asian") {
+          x_bounds <-
+            input[[eval(paste(params_list[[input$x_axis_asian]], "_2", sep = ""))]]
+        } else {
+          x_bounds <-
+            input[[eval(paste(params_list[[input$x_axis]], "_2", sep = ""))]]
+        }
 
         x_from <- x_bounds[1]
         x_to <- x_bounds[2]

diff --git a/man/Greeks.Rd b/man/Greeks.Rd
diff --git a/man/Implied_Volatility.Rd b/man/Implied_Volatility.Rd