[MediaWiki-commits] [Gerrit] wikimedia...wetzel[master]: Annotate Reportupdater migration on graphs
Chelsyx has submitted this change and it was merged. (
https://gerrit.wikimedia.org/r/341745 )
Change subject: Annotate Reportupdater migration on graphs
..
Annotate Reportupdater migration on graphs
Bug: T150915
Change-Id: I8bc4bd8ca8883e947ca77439edb0f5af47a6be8a
---
M server.R
M tab_documentation/geo_breakdown.md
M tab_documentation/geohack_usage.md
M tab_documentation/tiles_summary.md
M tab_documentation/tiles_total_by_zoom.md
M tab_documentation/tiles_users_by_style.md
M tab_documentation/unique_users.md
M tab_documentation/wikiminiatlas_usage.md
M tab_documentation/wikivoyage_usage.md
M tab_documentation/wiwosm_usage.md
10 files changed, 42 insertions(+), 21 deletions(-)
Approvals:
Chelsyx: Verified; Looks good to me, approved
diff --git a/server.R b/server.R
index d3353e7..d24e621 100644
--- a/server.R
+++ b/server.R
@@ -40,7 +40,8 @@
dyEvent(as.Date("2015-09-17"), "A (announcement)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-08"), "B (enwiki launch)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-12"), "C (cache clear)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-11-09"), "D (pkget)", labelLoc = "bottom")
+ dyEvent(as.Date("2016-11-09"), "D (pkget)", labelLoc = "bottom") %>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$tiles_style_series <- renderDygraph({
@@ -59,7 +60,8 @@
dyEvent(as.Date("2015-09-17"), "A (announcement)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-08"), "B (enwiki launch)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-12"), "C (cache clear)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-11-09"), "D (pkget)", labelLoc = "top")
+ dyEvent(as.Date("2016-11-09"), "D (pkget)", labelLoc = "top") %>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$tiles_users_series <- renderDygraph({
@@ -78,7 +80,8 @@
dyEvent(as.Date("2015-09-17"), "A (announcement)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-08"), "B (enwiki launch)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-12"), "C (cache clear)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-11-08"), "D (pkget)", labelLoc = "top")
+ dyEvent(as.Date("2016-11-08"), "D (pkget)", labelLoc = "top") %>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$zoom_level_selector_container <- renderUI({
@@ -99,7 +102,8 @@
polloi::smoother(smooth_level =
polloi::smooth_switch(input$smoothing_global,
input$smoothing_tiles_zoom_series)) %>%
polloi::make_dygraph("Date", "Tiles", "Total tiles by zoom level") %>%
dyAxis("y", logscale = input$tiles_zoom_logscale) %>%
- dyLegend(labelsDiv = "tiles_zoom_series_legend", show = "always")
+ dyLegend(labelsDiv = "tiles_zoom_series_legend", show = "always") %>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$users_per_platform <- renderDygraph({
@@ -110,7 +114,8 @@
dyLegend(labelsDiv = "users_per_platform_legend", show = "always") %>%
dyRangeSelector %>%
dyEvent(as.Date("2016-04-15"), "A (Maps EL bug)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
+ dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
%>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$geohack_feature_usage <- renderDygraph({
@@ -120,7 +125,8 @@
dyRangeSelector %>%
dyAxis("y", logscale = input$geohack_feature_usage_logscale) %>%
dyEvent(as.Date("2016-04-15"), "A (Maps EL bug)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
+ dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
%>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$wikiminiatlas_feature_usage <- renderDygraph({
@@ -130,7 +136,8 @@
dyRangeSelector %>%
dyAxis("y", logscale = input$wikiminiatlas_feature_usage_logscale) %>%
dyEvent(as.Date("2016-04-15"), "A (Maps EL bug)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
+ dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
%>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$wikivoyage_feature_usage <- renderDygraph({
@@ -140,7 +147,8 @@
dyRangeSelector %>%
dyAxis("y", logscale = input$wikivoyage_feature_usage_logscale) %>%
dyEvent(as.Date("2016-04-15"), "A (Maps EL bug)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
+ dyEvent(as.Date("2016-06-1
[MediaWiki-commits] [Gerrit] wikimedia...wetzel[master]: Annotate Reportupdater migration on graphs
Bearloga has uploaded a new change for review. (
https://gerrit.wikimedia.org/r/341745 )
Change subject: Annotate Reportupdater migration on graphs
..
Annotate Reportupdater migration on graphs
Change-Id: I8bc4bd8ca8883e947ca77439edb0f5af47a6be8a
---
M server.R
M tab_documentation/geo_breakdown.md
M tab_documentation/geohack_usage.md
M tab_documentation/tiles_summary.md
M tab_documentation/tiles_total_by_zoom.md
M tab_documentation/tiles_users_by_style.md
M tab_documentation/unique_users.md
M tab_documentation/wikiminiatlas_usage.md
M tab_documentation/wikivoyage_usage.md
M tab_documentation/wiwosm_usage.md
10 files changed, 42 insertions(+), 21 deletions(-)
git pull ssh://gerrit.wikimedia.org:29418/wikimedia/discovery/wetzel
refs/changes/45/341745/1
diff --git a/server.R b/server.R
index d3353e7..d24e621 100644
--- a/server.R
+++ b/server.R
@@ -40,7 +40,8 @@
dyEvent(as.Date("2015-09-17"), "A (announcement)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-08"), "B (enwiki launch)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-12"), "C (cache clear)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-11-09"), "D (pkget)", labelLoc = "bottom")
+ dyEvent(as.Date("2016-11-09"), "D (pkget)", labelLoc = "bottom") %>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$tiles_style_series <- renderDygraph({
@@ -59,7 +60,8 @@
dyEvent(as.Date("2015-09-17"), "A (announcement)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-08"), "B (enwiki launch)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-12"), "C (cache clear)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-11-09"), "D (pkget)", labelLoc = "top")
+ dyEvent(as.Date("2016-11-09"), "D (pkget)", labelLoc = "top") %>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$tiles_users_series <- renderDygraph({
@@ -78,7 +80,8 @@
dyEvent(as.Date("2015-09-17"), "A (announcement)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-08"), "B (enwiki launch)", labelLoc = "bottom")
%>%
dyEvent(as.Date("2016-01-12"), "C (cache clear)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-11-08"), "D (pkget)", labelLoc = "top")
+ dyEvent(as.Date("2016-11-08"), "D (pkget)", labelLoc = "top") %>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$zoom_level_selector_container <- renderUI({
@@ -99,7 +102,8 @@
polloi::smoother(smooth_level =
polloi::smooth_switch(input$smoothing_global,
input$smoothing_tiles_zoom_series)) %>%
polloi::make_dygraph("Date", "Tiles", "Total tiles by zoom level") %>%
dyAxis("y", logscale = input$tiles_zoom_logscale) %>%
- dyLegend(labelsDiv = "tiles_zoom_series_legend", show = "always")
+ dyLegend(labelsDiv = "tiles_zoom_series_legend", show = "always") %>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$users_per_platform <- renderDygraph({
@@ -110,7 +114,8 @@
dyLegend(labelsDiv = "users_per_platform_legend", show = "always") %>%
dyRangeSelector %>%
dyEvent(as.Date("2016-04-15"), "A (Maps EL bug)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
+ dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
%>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$geohack_feature_usage <- renderDygraph({
@@ -120,7 +125,8 @@
dyRangeSelector %>%
dyAxis("y", logscale = input$geohack_feature_usage_logscale) %>%
dyEvent(as.Date("2016-04-15"), "A (Maps EL bug)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
+ dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
%>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$wikiminiatlas_feature_usage <- renderDygraph({
@@ -130,7 +136,8 @@
dyRangeSelector %>%
dyAxis("y", logscale = input$wikiminiatlas_feature_usage_logscale) %>%
dyEvent(as.Date("2016-04-15"), "A (Maps EL bug)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
+ dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
%>%
+ dyEvent(as.Date("2017-01-01"), "R (reportupdater)", labelLoc = "bottom")
})
output$wikivoyage_feature_usage <- renderDygraph({
@@ -140,7 +147,8 @@
dyRangeSelector %>%
dyAxis("y", logscale = input$wikivoyage_feature_usage_logscale) %>%
dyEvent(as.Date("2016-04-15"), "A (Maps EL bug)", labelLoc = "bottom")
%>%
- dyEvent(as.Date("2016-06-17"), "A (Maps EL patch)", labelLoc = "bottom")
+ dyEvent(a
