fix

easystats · Sep 8, 2023 · 5b8ef7e · 5b8ef7e
1 parent c555306
commit 5b8ef7e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/utils_labels.R b/R/utils_labels.R
@@ -56,7 +56,7 @@
   value_labels <- c(value_labels, stats::setNames(missing_levels, missing_levels))
 
   # now we can add back levels
-  levels(x) <- names(value_labels)[order(value_labels)]
+  levels(x) <- names(value_labels)[order(as.numeric(value_labels))]
   attr(x, "labels") <- NULL
 
   x