A036742 Numbers <= 3999 sorted in Roman numeral lexicographic order.
100, 200, 300, 301, 302, 303, 304, 309, 350, 351, 352, 353, 354, 359, 355, 356, 357, 358, 360, 361, 362, 363, 364, 369, 365, 366, 367, 368, 370, 371, 372, 373, 374, 379, 375, 376, 377, 378, 380, 381, 382, 383, 384, 389, 385, 386, 387, 388, 305, 306, 307
Offset: 1
Links
- Steven N. Severinghaus, Table of n, a(n) for n = 1..3999
Programs
-
Maple
A036742 := sort([seq(convert(n, roman), n=1..3999)], lexorder): seq(convert(A036742[n], arabic), n=1..51); # Nathaniel Johnston, May 18 2011
-
Mathematica
FromRomanNumeral[Sort[RomanNumeral[Range[3999]]]] (* Hans Havermann, May 06 2019; requires Mathematica 10.2+ *)
-
Perl
#!/bin/bash # Requires Roman module: # http://search.cpan.org/~chorny/Roman-1.20/lib/Roman.pm perl -e 'use Roman; for(1..3999) { print roman($_)." "; }' | sort | perl -ne 'use Roman; chomp; print arabic($_)." "' # Steven N. Severinghaus, Nov 17 2007
-
Python
import roman A36742=sorted(range(1,4000), key=roman.toRoman) def A036742(n): return A36742[n-1] # M. F. Hasler, Aug 16 2025
Comments