OFFSET
1,2
FORMULA
a(3n) = A000578(n+2), a(3n+1)=A011379(n+1), a(3n+2)=A027444(n) for n>=1. - R. J. Mathar, Feb 04 2008
MAPLE
A027444 := proc(n) n^3+n^2+n ; end: A011379 := proc(n) n^3+n^2 ; end: A000578 := proc(n) n^3 ; end: A102637 := proc(n) if n <= 3 then A000578(n) ; else npr := floor(n/3) ; if n mod 3 = 0 then A000578(npr+2) ; elif n mod 3 = 1 then A011379(npr+1) ; else A027444(npr) ; fi ; fi ; end: seq(A102637(n), n=1..80) ; # R. J. Mathar, Feb 04 2008
CROSSREFS
KEYWORD
nonn
AUTHOR
Giovanni Teofilatto, Feb 01 2005
EXTENSIONS
Edited by R. J. Mathar, Feb 04 2008
STATUS
approved