A078715 Palindromic Roman numerals.
1, 2, 3, 5, 10, 19, 20, 30, 50, 100, 190, 200, 300, 500, 1000, 1900, 2000, 3000
Offset: 1
Examples
I, II, III, V, X, XIX, XX, XXX, L, C, CXC, CC, CCC, D, M, MCM, MM, MMM
References
- Encyclopaedia Britannica, 1981 ed., Vol. 11, "Mathematics, History of", p. 647.
- Webster's Third New International Dictionary (Unabridged), 1976 ed., "Cardinal Numbers Table" and footnotes, p. 1549.
Links
- Paul Lewis, Roman numerals and calendar
- Gerard Schildberger, The first 3999 numbers in Roman numerals
- Eric Weisstein's World of Mathematics, Roman Numerals
Crossrefs
Programs
-
Haskell
a078715 n = a078715_list !! (n-1) a078715_list = filter ((== 1) . a136522 . a061493) [1..3999] -- Reinhard Zumkeller, Apr 14 2013
-
Mathematica
Select[Range[3000], PalindromeQ[RomanNumeral[#]] &] (* Paolo Xausa, Mar 03 2024 *)
-
PARI
is_A078715(n)=Vecrev(n=Str(A061493(n)))==Vec(n) \\ M. F. Hasler, Jan 12 2015
Comments