|
|
A101845
|
|
Triangle formed by left half of A101842, read by rows.
|
|
2
|
|
|
1, 1, 3, 1, 7, 16, 1, 15, 61, 115, 1, 31, 206, 626, 1056, 1, 63, 659, 2989, 7554, 11774, 1, 127, 2052, 13308, 47349, 105099, 154624, 1, 255, 6297, 56935, 274677, 824331, 1660957, 2337507, 1, 511, 19162, 237862, 1518478, 5960818, 15747154, 29428654
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
EXAMPLE
|
Triangle begins:
1,
1, 3,
1, 7, 16,
1, 15, 61, 115,
1, 31, 206, 626, 1056,
1, 63, 659, 2989, 7554, 11774,
|
|
MAPLE
|
A101842 := proc(n, k) option remember ; if k < -n or k >= n then 0 ; elif n = 1 then 1; else (n-k)*A101842(n-1, k-1)+A101842(n-1, k)+(n+k+1)*A101842(n-1, k+1) ; fi ; end: A101845 := proc(n, k) A101842(n, -n+k-1) ; end: for n from 1 to 10 do for k from 1 to n do printf("%d, ", A101845(n, k)) ; od: od: # R. J. Mathar, Aug 07 2007
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|