|
| |
|
|
A048492
|
|
a(n) = ( 8*(2^n) - n^2 - 3*n - 6 )/2.
|
|
3
| |
|
|
1, 3, 8, 20, 47, 105, 226, 474, 977, 1991, 4028, 8112, 16291, 32661, 65414, 130934, 261989, 524115, 1048384, 2096940, 4194071, 8388353, 16776938, 33554130, 67108537, 134217375, 268435076, 536870504, 1073741387, 2147483181
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
COMMENTS
| Partial sums of A000325, starting at n=1. - Klaus Brockhaus, Oct 13 2008
|
|
|
LINKS
| Vincenzo Librandi, Table of n, a(n) for n = 0..1000
|
|
|
FORMULA
| a(0) = 1; a(n) = a(n-1) + 2^(n+1) - (n+1) for n > 0. - Klaus Brockhaus, Oct 13 2008
|
|
|
MATHEMATICA
| lst={}; s=0; Do[s+=2^n-n; AppendTo[lst, s], {n, 5!}]; lst [From Vladimir Orlovsky, Sep 30 2008]
|
|
|
PROG
| (ARIBAS) a:=0; for n:=1 to 30 do a:=a+2**n-n; write(a, ", "); end; [From Klaus Brockhaus, Oct 13 2008]
(MAGMA) [( 8*(2^n) -n^2 -3*n -6 )/2: n in [0..30]]; // Vincenzo Librandi, Sep 23 2011
|
|
|
CROSSREFS
| a(n)=T(0, n)+T(1, n-1)+...+T(n, 0), array T given by A048483.
Cf. A000325 (2^n - n), A145070. [From Klaus Brockhaus, Oct 13 2008]
Sequence in context: A036676 A101533 A138803 * A006776 A050231 A136305
Adjacent sequences: A048489 A048490 A048491 * A048493 A048494 A048495
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| Clark Kimberling (ck6(AT)evansville.edu)
|
|
|
EXTENSIONS
| Better description from Frank Ellermann, Mar 16, 2002
Corrected by T. D. Noe, Nov 08 2006
|
| |
|
|
