[go: up one dir, main page]

login
A179526
(3^k - 1)/2 appears 3^(k-1) times, k>0.
3
1, 4, 4, 4, 13, 13, 13, 13, 13, 13, 13, 13, 13, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121, 121
OFFSET
0,2
FORMULA
a(n+1) = 3*a(floor(n/3)) + 1; a(0) = 1.
MATHEMATICA
Table[PadRight[{}, 3^(k-1), (3^k-1)/2], {k, 5}]//Flatten (* Harvey P. Dale, May 30 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Jul 18 2010
EXTENSIONS
Erroneous comment deleted by Reinhard Zumkeller, Jul 23 2010
STATUS
approved