|
Search: id:A033540
|
|
| |
|
| 1, 2, 6, 21, 88, 445, 2676, 18739, 149920, 1349289, 13492900, 148421911, 1781062944, 23153818285, 324153456004, 4862301840075, 77796829441216, 1322546100500689, 23805829809012420, 452310766371235999
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
FORMULA
|
a(n)=n!*(1+1/0!+1/1!+...+1/(n-1)!) [ Jon Bentley, jlb(AT)research.bell-labs.com ]
For n>=1, a(n+1)=floor((1+e)*n!)-1. - Benoit Cloitre (benoit7848c(AT)orange.fr), Sep 07 2002
a(n) = n! + A007526(n). E.g.f.: (1+x*exp(x))/(1-x). - Vladeta Jovovic (vladeta(AT)eunet.rs), Feb 02 2003
a(n)=(n+1)*a(n-1)-(2*n-3)*a(n-2)+(n-3)*a(n-3) for n>=4 [From Jaume Oliver Lafont (joliverlafont(AT)gmail.com), Sep 11 2009]
|
|
MAPLE
|
restart:a:= proc(n) option remember; if n=0 then 1 else add((a(n-1)+1), j=0..n-1) fi end: seq (a(n), n=0..19); # [From Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Mar 29 2009]
|
|
MATHEMATICA
|
a=1; lst={a}; Do[a=a*n+n; AppendTo[lst, a], {n, 1, 5!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Dec 25 2008]
|
|
CROSSREFS
|
Sequence in context: A090805 A150226 A150227 this_sequence A147719 A115089 A001928
Adjacent sequences: A033537 A033538 A033539 this_sequence A033541 A033542 A033543
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Antti Karttunen
|
|
|
Search completed in 0.002 seconds
|