OFFSET
1,1
LINKS
Nathaniel Johnston, Table of n, a(n) for n = 1..215 (complete up to 3999)
MAPLE
for n from 1 to 3999 do if(length(convert(n, roman)) = 4)then printf("%d, ", n): fi: od: # Nathaniel Johnston, May 18 2011
MATHEMATICA
Select[Range[300], StringLength[RomanNumeral[#]]==4&] (* Harvey P. Dale, Aug 20 2021 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Kyle Stern, Jan 01 2011
EXTENSIONS
Extended by Nathaniel Johnston, May 18 2011
STATUS
approved