diff --git a/fun.R b/fun.R index 5ab00b6..b6d2f8a 100644 --- a/fun.R +++ b/fun.R @@ -82,7 +82,7 @@ add_science_filter <- function(data){ } add_nature_filter <- function(data){ - data$filter <- as.numeric(grepl("/s", data$url)) + data$filter <- as.numeric(!grepl("/s", data$url)) return(data) }