OFFSET
0,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1500
Eric Weisstein's World of Mathematics, Repdigit
FORMULA
From Chai Wah Wu, May 30 2016: (Start)
a(n) = 17*a(n-15) - 16*a(n-30) for n > 29.
x*(15*x^14 + 14*x^13 + 13*x^12 + 12*x^11 + 11*x^10 + 10*x^9 + 9*x^8 + 8*x^7 + 7*x^6 + 6*x^5 + 5*x^4 + 4*x^3 + 3*x^2 + 2*x + 1)/(16*x^30 - 17*x^15 + 1).
(End)
a(n) = (n - 15*floor((n-1)/15))*(16^floor((n+14)/15) - 1)/15. - Ilya Gutkovskiy, May 30 2016
MATHEMATICA
Union[Flatten[Table[FromDigits[PadRight[{}, n, d], 16], {n, 0, 50}, {d, 15}]]] (* Vincenzo Librandi, Feb 06 2014 *)
PROG
(Python)
A048340_list = [0] + [int(d*l, 16) for l in range(1, 10) for d in '123456789abcdef'] # Chai Wah Wu, May 30 2016
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Patrick De Geest, Feb 15 1999
STATUS
approved