|
| |
|
|
A129814
|
|
a(n) = Bernoulli(n) * (n+1)!.
|
|
3
| |
|
|
1, -1, 1, 0, -4, 0, 120, 0, -12096, 0, 3024000, 0, -1576143360, 0, 1525620096000, 0, -2522591034163200, 0, 6686974460694528000, 0, -27033456071346536448000, 0, 160078872315904478576640000, 0, -1342964491649083924630732800000, 0
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,5
|
|
|
COMMENTS
| Contribution from Peter Luschny (peter(AT)luschny), Apr 21 2009: (Start)
Reading A137777 and A159749 as a triangular sequence:
2*a(n) = A137777(n, 0) for n > 0.
2*a(n) = (-1)^n*A159749(n, 0) for n >= 0. (End)
|
|
|
FORMULA
| a(2*n) = A001332(n).
|
|
|
PROG
| (PARI) {for(n=0, 25, print1(bernfrac(n)*(n+1)!, ", "))}
(PARI) {a(n) = if( n<0, 0, (n + 1)! * bernfrac( n))} /* Michael Somos Mar 29 2011 */
(MAGMA) [Bernoulli(n) * Factorial(n+1): n in [0..100]]; // Vincenzo Librandi, Mar 29 2011
|
|
|
CROSSREFS
| Cf. A001332.
Sequence in context: A101502 A118440 A013037 * A129825 A138734 A119010
Adjacent sequences: A129811 A129812 A129813 * A129815 A129816 A129817
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Paul Curtz (bpcrtz(AT)free.fr), May 20 2007
|
|
|
EXTENSIONS
| Edited and extended by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), May 28 2007
|
| |
|
|