|
Search: id:A081543
|
|
|
| A081543 |
|
G.f.: sum(k>=1,x^k/(1-x^k)^(k+1)). |
|
+0
1
|
|
| 1, 3, 4, 8, 6, 17, 8, 24, 20, 32, 12, 76, 14, 51, 72, 97, 18, 158, 20, 213, 142, 101, 24, 491, 152, 132, 248, 479, 30, 915, 32, 681, 398, 206, 828, 1859, 38, 249, 600, 2560, 42, 2692, 44, 1686, 2864, 347, 48, 6166, 1766, 3405
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
FORMULA
|
If p is prime then a(p)=p+1
|
|
PROGRAM
|
(PARI) a(n)=if(n<1, 0, polcoeff(sum(k=1, n, 1/(1-x^k)^k, x*O(x^(n^2))), n))
|
|
CROSSREFS
|
Sequence in context: A129283 A079787 A081307 this_sequence A105753 A019972 A064406
Adjacent sequences: A081540 A081541 A081542 this_sequence A081544 A081545 A081546
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Apr 21 2003
|
|
EXTENSIONS
|
Description corrected by Vladeta Jovovic (vladeta(AT)Eunet.yu), Aug 22 2003
|
|
|
Search completed in 0.002 seconds
|
