%I #13 Jul 06 2024 16:15:35
%S 0,1,2,3,4,5,6,7,8,9,60,61,62,63,64,65,66,67,68,69,120,121,122,123,
%T 124,125,126,127,128,129,180,181,182,183,184,185,186,187,188,189,240,
%U 241,242,243,244,245,246,247,248,249,300,301,302,303,304,305,306,307,308
%N Numbers in base-60 representation that can be written with decimal digits.
%D 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.
%D 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.
%H Reinhard Zumkeller, <a href="/A102493/b102493.txt">Table of n, a(n) for n = 1..10000</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Sexagesimal.html">Sexagesimal</a>
%H Wikipedia, <a href="http://en.wikipedia.org/wiki/Sexagesimal">Sexagesimal</a>
%t Table[Range[60n,60n+9],{n,0,6}]//Flatten (* _Harvey P. Dale_, Jul 06 2024 *)
%o (Haskell)
%o import Data.List (unfoldr)
%o a102493 n = a102493_list !! (n-1)
%o a102493_list = filter (all (<= 9) . unfoldr
%o (\x -> if x == 0 then Nothing else Just $ swap $ divMod x 60)) [0..]
%o -- _Reinhard Zumkeller_, Jun 27 2013
%Y Complement of A102494; A102487, A102489, A102491.
%K nonn,base
%O 1,3
%A _Reinhard Zumkeller_, Jan 12 2005