r语言 - datatable . rowsgroup .js颠倒了我的数据框架的合并列的顺序

Question

我已经使用dataTables.rowsGroup.js来合并我的数据集的第一列，但当它被成功合并时，它首先显示Population 6而不是Population 1。我怎样才能恢复正常呢?

library(DT)
Population<-c("Population 1","Population 1","Population 1","Population 2","Population 2","Population 2","Population 3","Population 3",
"Population 4","Population 4","Population 5","Population 5","Population 5","Population 6","Population 6","Population 6")
Variable<-c("row 1","row 2 to 10","total","row 1","row 2 to 10","total","row 1","total","row 1","total","row 1","row 2 to 5","total","row 1","row 2 to 5","total")
df<-data.frame(Population,Variable)
df$Population <- factor(df$Population, levels = c("Population 1","Population 2","Population 3","Population 4","Population 5","Population 6"))



dtable <- datatable(df, rownames = FALSE,
options = list(
rowsGroup = list(0) # merge cells of column 1
))
path <- "C:/Users/User/Documents/Darya/www"
dep <- htmltools::htmlDependency(
"RowsGroup", "2.0.0",
path, script = "dataTables.rowsGroup.js")
dtable$dependencies <- c(dtable$dependencies, list(dep))
dtable

Answer 1

options=list(order = list(list(1, 'asc'))

了