|
|
A136113
|
|
Pentagonal numbers > 0 which are not the difference of two larger pentagonal numbers.
|
|
6
|
|
|
1, 5, 12, 35, 51, 92, 117, 176, 330, 477, 782, 852, 1080, 3876, 4347, 7526, 7740, 9801, 13776, 14652, 22632, 24512, 27270, 39285, 69876, 85562, 88452, 103622, 124272, 137562, 144926, 193142, 220992, 268182, 315792, 343922, 354051, 403782, 523626
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
a(1..3)=P(1),P(2),P(3) since these cannot be written as difference of 2 other pentagonal numbers > 0.
P(4)=22=P(8)-P(7), therefore P(4) is not in this sequence.
|
|
PROG
|
(PARI) P(n)=n*(3*n-1)>>1 /* a.k.a. A000326 */
isPent(t)=P(sqrtint((t<<1)\3)+1)==t
for( i=1, 999, for( j=i+1, (P(i)-1)\3, isPent(P(i)+P(j))&next(2)); print1(P(i)", "))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|