login
A242182
Numbers with four C's in Roman numerals.
0
390, 391, 392, 393, 394, 395, 396, 397, 398, 399, 890, 891, 892, 893, 894, 895, 896, 897, 898, 899, 1390, 1391, 1392, 1393, 1394, 1395, 1396, 1397, 1398, 1399, 1890, 1891, 1892, 1893, 1894, 1895, 1896, 1897, 1898, 1899
OFFSET
1,1
COMMENTS
These will always have CCCXC in them.
EXAMPLE
390 = CCCXC; 890 = DCCCXC
MATHEMATICA
Select[Range[2000], StringCount[RomanNumeral[#], "C"]==4&] (* or *) LinearRecurrence[{1, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1}, {390, 391, 392, 393, 394, 395, 396, 397, 398, 399, 890}, 40] (* Harvey P. Dale, Jul 30 2015 *)
PROG
(PARI) lista() = {for (i=0, 9, for (j=0, 9, print1((390+j)+500*i, ", "); ); ); } \\ Michel Marcus, May 14 2014
CROSSREFS
Sequence in context: A299719 A300340 A228580 * A136153 A069477 A325993
KEYWORD
nonn,easy,less,base
AUTHOR
J. Lowell, May 06 2014
STATUS
approved