OFFSET
1,2
COMMENTS
1
3 2
4 5 6
10 9 8 7
11 12 13 14 15
21 20 19 18 17 16
22 23 24 25 26 27 28
36 35 34 33 32 31 30 29
37 38 39 40 41 42 43 44 45
55 54 53 52 51 50 49 48 47 46
56 57 58 59 60 61 62 63 64 65 66
MAPLE
read("transforms") ;
A079826 := proc(n)
local L, k;
L := [] ;
for k from 1 to (n+1)/2 do
L := [op(L), A056011(n-k+1, k)] ;
end do:
digcatL(L) ;
end proc: # R. J. Mathar, Sep 05 2012
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Feb 11 2003
EXTENSIONS
More terms from Jonathan R. Love (japanada11(AT)yahoo.ca), Mar 08 2007
Corrected by Kevin Ryde, Aug 23 2012
STATUS
approved