SortBy[Range[13],ToString]