Я пытаюсь создать сюжет с частотой фактора. Но у меня есть 70 различных факторов. Вот почему я хотел бы создать «другую» группу для всего, что не является Top10.
В настоящее время она работает с функцией top_n() для создания топ-10.
ProblemFrequency <- count(Disruptions, 'Problem')
Top10 <- top_n(ProblemFrequency, n=10, freq)
И я уже получил «другую» группировку для работы, используя within() в сочетании с оператором if-else
ProblemFrequency <- within(ProblemFrequency, other.group <- ifelse(freq > 100, as.character(Problem), "Other"))
ProblemFrequency <- within(ProblemFrequency, relevel(factor(other.group), "Other"))
У меня есть эти две части, работающие отдельно, но я не могу понять, какобъединить их. Я работаю с блестящим приложением, где пользователи могут фильтровать, Top10 и их частота постоянно меняется, поэтому я не могу просто использовать уравнение.
Я думаю, что оператор if должен проверять, находится ли коэффициент вТоп 10. Если нет: сгруппируйте его в другое.