OFFSET
0,3
MAPLE
A132207 := proc(n)
L := [] ;
for k from 0 to (2*4^n-1)/2 do
L := [op(L), 2*4^n+3*k-1, 5*4^n+3*k-1] ;
end do:
end proc:
for n from 0 to 3 do
L := A132207(n) ;
for l in L do
printf("%d, ", (l-1)/3) ;
end do:
end do:
# R. J. Mathar, Sep 26 2011
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Omar E. Pol, Jan 05 2009
STATUS
approved