Christopher Johnson (WMDE) has submitted this change and it was merged.

Change subject: limits range of pages view to nrows of content pages dataset
......................................................................


limits range of pages view to nrows of content pages dataset

Change-Id: I1f54dbd0b6e575b42621dc37f3810dedc14b8e28
---
M output/server-home.R
M output/server-recent.R
2 files changed, 4 insertions(+), 1 deletion(-)

Approvals:
  Christopher Johnson (WMDE): Verified; Looks good to me, approved



diff --git a/output/server-home.R b/output/server-home.R
index 0f4ca81..719fce3 100644
--- a/output/server-home.R
+++ b/output/server-home.R
@@ -22,3 +22,5 @@
   formatCurrency(2:3, currency = "", interval = 3, mark = ",") %>%
   formatStyle(3, color = styleInterval(cuts, c("red", "green"))
 ))
+
+
diff --git a/output/server-recent.R b/output/server-recent.R
index a17b40e..7761999 100644
--- a/output/server-recent.R
+++ b/output/server-recent.R
@@ -34,7 +34,8 @@
 df_recent_pages <- df_pages_ordered
 df_gooditems_ordered <- wikidata_gooditems[order(wikidata_gooditems$date, 
decreasing =TRUE),]
 df_recent_gooditems <- df_gooditems_ordered
-df_recent_content <- data.frame(df_recent_pages, df_recent_gooditems)
+good_items_nrow <- nrow(df_recent_gooditems)
+df_recent_content <- data.frame(df_recent_pages[1:good_items_nrow,], 
df_recent_gooditems)
 dt_recent_content <- data.table(df_recent_content)
 dt_recent_content <- dt_recent_content[, list(date, count, count.1)]
 output$wikidata_daily_pages_delta_plot <- renderDygraph({

-- 
To view, visit https://gerrit.wikimedia.org/r/244893
To unsubscribe, visit https://gerrit.wikimedia.org/r/settings

Gerrit-MessageType: merged
Gerrit-Change-Id: I1f54dbd0b6e575b42621dc37f3810dedc14b8e28
Gerrit-PatchSet: 1
Gerrit-Project: wikidata/analytics/dashboard
Gerrit-Branch: master
Gerrit-Owner: Christopher Johnson (WMDE) <christopher.john...@wikimedia.de>
Gerrit-Reviewer: Christopher Johnson (WMDE) <christopher.john...@wikimedia.de>

_______________________________________________
MediaWiki-commits mailing list
MediaWiki-commits@lists.wikimedia.org
https://lists.wikimedia.org/mailman/listinfo/mediawiki-commits

Reply via email to