Заказ DataFrame по конкретному столбцу C1
data[order(data$c1,decreasing = T),]
Yan Zhang
data[order(data$c1,decreasing = T),]