Я предполагаю, что вам нужно одно AIC.x
значение для k_neigh_numb.x
и Region
.
Затем мы можем сделать все AIC.x
строки:
new_rows = data %>%
group_by(k_neigh_numb.x, Region) %>%
summarise(estimate = max(AIC.x)) %>%
mutate(term = 'AIC.x',
std.error = NA)
И добавьте новые и существующие строки вместе следующим образом:
final = rbind(
select(new_rows, c('k_neigh_numb.x', 'term', 'estimate', 'std.error', 'Region')),
select(data, c('k_neigh_numb.x', 'term', 'estimate', 'std.error', 'Region'))) %>%
arrange(k_neigh_numb.x)
Операторы select преднамеренно делают столбцы из двух таблиц выровненными. Существуют альтернативные функции, которые связываются по именам столбцов, если они вам понадобятся.