6 lines
100 B
R
6 lines
100 B
R
lex_sort <- function(n){
|
|
str <- sort(as.character(1:n))
|
|
return(as.numeric(str))
|
|
}
|
|
|
|
lex_sort(13)
|