|
|
A254344
|
|
a(0) = 3; a(n+1) is the smallest number not in the sequence such that a(n+1) - Sum_{i=1..n} a(i) divides a(n+1) - Product_{i=1..n} a(i).
|
|
2
|
|
|
3, 1, 5, 6, 10, 18, 42, 80, 150, 36, 90, 70, 414, 140, 178, 954, 2180, 4290, 8586, 5460, 9670, 18200, 50544, 15938, 1560, 19500, 130000, 83226, 44352, 68362, 249704, 712866, 1265670, 111510, 510734, 3314542, 2236752, 8865822, 17731350, 2285220, 9196442
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
PROG
|
(PARI) v=[3]; print1(3, ", "); n=1; while(n<10^4, p=prod(i=1, #v, v[i]); if(vecsum(v)!=n&&(p-n)\(vecsum(v)-n)==(p-n)/(vecsum(v)-n)&&!vecsearch(vecsort(v), n), v=concat(v, n); print1(n, ", "); n=0); n++)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|