OFFSET
0,1
FORMULA
a(4n) = 2*A111575(4n). a(4n+1)= 3*A111575(4n+1). a(4n+2)= 4*A111575(4n+2). a(4n+3)= 5*A111575(4n+3). - R. J. Mathar, Jan 12 2008
MAPLE
A111575 := proc(n) 3^(floor(n/4)) ; end: A133463 := proc(n) 2+add( A111575(i), i=0..n-1) ; end: seq(A133463(n), n=0..80) ; # R. J. Mathar, Jan 12 2008
MATHEMATICA
Accumulate[Join[{2}, With[{pt=3^Range[0, 15]}, Sort[Join[pt, pt, pt, pt]]]]] (* Harvey P. Dale, Jul 21 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul Curtz, Nov 28 2007
EXTENSIONS
Edited and extended by R. J. Mathar, Jan 12 2008
STATUS
approved