avoid spurious warnings from forcats

[maxheld83]

metacheck/R/metrics_funder.R

Lines 29 to 34 in 1f46bb4

	out <- funder_info %>%
	mutate(name = ifelse(is.na(.data$name), "No funding info", .data$name)) %>%
	mutate(name = forcats::fct_lump_prop(.data$name, prop = 0.03, other_level = "Other funders")) %>%
	mutate(name = forcats::fct_infreq(.data$name)) %>%
	mutate(name = forcats::fct_relevel(.data$name, "Other funders", after = Inf)) %>%
	mutate(name = forcats::fct_relevel(.data$name, "No funding info", after = Inf))

These relevels cause (spurious) warnings when the levels do not, in fact, exist, which can be the case