Commit b7c73c32 authored by iwakeh's avatar iwakeh 🌴
Browse files

Only consider stricly lower counts as downturns. task-21419

parent edf2edb2

website/rserve/graphs.R

+1 −1
Original line number Diff line number Diff line
@@ -862,7 +862,7 @@ plot_userstats <- function(start, end, node, variable, value, events, 
  if (length(na.omit(u$users)) > 0 & events != "off" &

      variable == 'country' & length(value) == 1 && value != "all") {

    upturns <- u[u$users > u$upper, c("date", "users")]

    downturns <- u[u$users <= u$lower, c("date", "users")]

    downturns <- u[u$users < u$lower, c("date", "users")]

    if (events == "on") {

      u[!is.na(u$lower) & u$lower < 0, "lower"] <- 0

      plot <- plot +