%I A148086
%S A148086 1,1,2,4,10,22,59,149,396,1041,2907,7760,21816,60298,169741,475054,1359128,
3816950,10972685,
%T A148086 31304334,89879700,257711500,747124581,2144777317,6229523512,18035524556,
52361269786,
%U A148086 152014079572,443837403206,1288731108002,3768163857728,11001149176426,
32145852887328
%N A148086 Number of walks within N^3 (the first octant of Z^3) starting at (0,0,
0) and consisting of n steps taken from {(-1, -1, 1), (0, 1, -1),
(1, 0, 1)}
%H A148086 A. Bostan and M. Kauers, 2008. Automatic Classification of Restricted
Lattice Walks, <a href="http://arxiv.org/abs/0811.2899">ArXiv 0811.2899</
a>.
%t A148086 aux[i_Integer, j_Integer, k_Integer, n_Integer] := Which[Min[i, j, k,
n] < 0 || Max[i, j, k] > n, 0, n == 0, KroneckerDelta[i, j, k, n],
True, aux[i, j, k, n] = aux[-1 + i, j, -1 + k, -1 + n] + aux[i, -1
+ j, 1 + k, -1 + n] + aux[1 + i, 1 + j, -1 + k, -1 + n]]; Table[Sum[aux[i,
j, k, n], {i, 0, n}, {j, 0, n}, {k, 0, n}], {n, 0, 10}]
%Y A148086 Sequence in context: A164990 A121285 A030234 this_sequence A076875 A018111
A094987
%Y A148086 Adjacent sequences: A148083 A148084 A148085 this_sequence A148087 A148088
A148089
%K A148086 nonn,walk
%O A148086 0,3
%A A148086 Manuel Kauers (manuel(AT)kauers.de), Nov 18 2008
|