Christopher Johnson (WMDE) has submitted this change and it was merged.
Change subject: removes existing_date removes time calc from recent active users
......................................................................
removes existing_date
removes time calc from recent active users
Change-Id: I504cb9d988c15621ad5a15251722af99af6c2c56
---
M output/server-engagement.R
M output/server-recent.R
2 files changed, 3 insertions(+), 4 deletions(-)
Approvals:
Christopher Johnson (WMDE): Verified; Looks good to me, approved
diff --git a/output/server-engagement.R b/output/server-engagement.R
index 76d2ac4..9f6dc9d 100644
--- a/output/server-engagement.R
+++ b/output/server-engagement.R
@@ -6,7 +6,7 @@
"", "Edits", "Wikidata Edits")
})
output$editdelta <- renderInfoBox({
- wikidata_edits_30day <- wikidata_edits[which(wikidata_edits$date >
existing_date - 30),]
+ wikidata_edits_30day <- wikidata_edits[which(wikidata_edits$date >
Sys.Date() - 30),]
edits_first <- tail(wikidata_edits_30day[order(wikidata_edits_30day$date,
decreasing =TRUE),],1)
edits_current <- head(wikidata_edits_30day[order(wikidata_edits_30day$date,
decreasing =TRUE),],1)
period_last <- format(edits_first[1])
diff --git a/output/server-recent.R b/output/server-recent.R
index e68030f..a17b40e 100644
--- a/output/server-recent.R
+++ b/output/server-recent.R
@@ -56,9 +56,8 @@
standard_seeAlso_box(metric_desc[1])
})
# http://wikiba.se/metrics#RecentUsers
-wikidata_recent_users <-
wikidata_active_users[which(wikidata_active_users$date > Sys.Date() - 8),]
-df_recent_users <- wikidata_recent_users[order(wikidata_recent_users$date,
decreasing =TRUE),]
-dt_recent_users <- data.table(wikidata_active_users)
+df_recent_users <- wikidata_active_users[order(wikidata_active_users$date,
decreasing =TRUE),]
+dt_recent_users <- data.table(df_recent_users)
output$wikidata_daily_users_delta_plot <- renderDygraph({
wikidata_daily_users_delta <- dt_recent_users[, list(date, count,
diff_count=diff(count)*-1)]
return(dygraph(wikidata_daily_users_delta,
--
To view, visit https://gerrit.wikimedia.org/r/244889
To unsubscribe, visit https://gerrit.wikimedia.org/r/settings
Gerrit-MessageType: merged
Gerrit-Change-Id: I504cb9d988c15621ad5a15251722af99af6c2c56
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
