A102493 Numbers in base-60 representation that can be written with decimal digits.
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 240, 241, 242, 243, 244, 245, 246, 247, 248, 249, 300, 301, 302, 303, 304, 305, 306, 307, 308
Offset: 1
References
- Mohammad K. Azarian, Meftah al-hesab: A Summary, MJMS, Vol. 12, No. 2, Spring 2000, pp. 75-95. Mathematical Reviews, MR 1 764 526. Zentralblatt MATH, Zbl 1036.01002.
- Mohammad K. Azarian, A Summary of Mathematical Works of Ghiyath ud-din Jamshid Kashani, Journal of Recreational Mathematics, Vol. 29(1), pp. 32-42, 1998.
Links
- Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
- Eric Weisstein's World of Mathematics, Sexagesimal
- Wikipedia, Sexagesimal
Programs
-
Haskell
import Data.List (unfoldr) a102493 n = a102493_list !! (n-1) a102493_list = filter (all (<= 9) . unfoldr (\x -> if x == 0 then Nothing else Just $ swap $ divMod x 60)) [0..] -- Reinhard Zumkeller, Jun 27 2013
-
Mathematica
Table[Range[60n,60n+9],{n,0,6}]//Flatten (* Harvey P. Dale, Jul 06 2024 *)