commit e5feaae314985046dc8b91d7f49502d269c9b5ef
Author: Karsten Loesing <karsten.loesing(a)gmx.net>
Date: Mon Jul 7 10:27:36 2014 +0200
Don't display censorship events in no-man's-land.
Whenever we didn't recognize a country code, we called the country
"no-man's-land". But this is confusing. The better approach is to
exclude countries we don't know from the table entirely.
Fixes #12515. Spotted by torland.
---
website/rserve/tables.R | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/website/rserve/tables.R b/website/rserve/tables.R
index e8c02cc..a22ceb5 100644
--- a/website/rserve/tables.R
+++ b/website/rserve/tables.R
@@ -45,7 +45,7 @@ write_userstats_censorship_events <- function(start, end, path) {
c$clients <= c$lower, 1, 0))
r <- aggregate(r[, c("upturn", "downturn")],
by = list(country = r$country), sum)
- r <- r[!(r$country %in% c("zy", "??", "a1", "a2", "o1", "ap", "eu")), ]
+ r <- r[(r$country %in% names(countrylist)), ]
r <- r[order(r$downturn, r$upturn, decreasing = TRUE), ]
r <- r[1:10, ]
r <- data.frame(cc = r$country,