Drop support for orphaned plotly package
Change-Id: I59e5339c613fc1eef89bb81afc0c260e2f60ed16
diff --git a/demo/alternativesOverTime.R b/demo/alternativesOverTime.R
index eb85ac8..07019bd 100755
--- a/demo/alternativesOverTime.R
+++ b/demo/alternativesOverTime.R
@@ -4,8 +4,6 @@
#
library(RKorAPClient)
library(ggplot2)
-library(plotly)
-library(htmlwidgets)
alternativesOverTime <- function(alternatives, years, kco = new("KorAPConnection", verbose=TRUE)) {
df <- expand_grid(Variant = alternatives, year = years) %>%
@@ -16,8 +14,7 @@
ggtitle(paste0(alternatives, collapse = " vs. ")) +
xlab("TIME") +
ylab(sprintf("Observed frequency ratio"))
- ppp <- RKorAPClient::ggplotly(g)
- print(ppp)
+ print(g)
df
}