|
Search: id:A102317
|
|
| |
|
| 1, 2, 7, 40, 333, 3706, 52128, 891700, 18038217, 422455778, 11265993155, 337573337108, 11241696796572, 412291622024088, 16524941775629068, 719072894898300540, 33777207106037303457, 1704222469853179505170
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
PROGRAM
|
(PARI) {a(n)=local(M=matrix(n+1, n+1)); for(m=0, n, for(k=0, m, M[m+1, k+1]=if(m==0|k==0, 1, M[m+1, k]+(k+1)*M[m, k+1]))); return(sum(i=0, n, M[n+1, i+1]))}
|
|
CROSSREFS
|
Cf. A102316.
Sequence in context: A162653 A105625 A135082 this_sequence A031973 A132785 A064626
Adjacent sequences: A102314 A102315 A102316 this_sequence A102318 A102319 A102320
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), Jan 04 2005
|
|
|
Search completed in 0.002 seconds
|