|
Search: id:A111271
|
|
| |
|
| 1, 2, 3, 6, 12, 15, 18, 35, 42, 74, 108, 140, 144, 168, 171, 180, 194, 240, 243, 312, 352, 404, 420, 486, 500, 522, 524, 546, 640, 790, 989, 1064, 1429, 1705, 1986, 2145, 2289, 2800, 3220, 3460, 3630, 4232, 4484, 4826, 4950, 5328, 5510, 6240, 6554, 8622, 9094
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
PROGRAM
|
(PARI) { /* replace M below by a <cr> (<ctrl+v><ctrl+m>) */ a=vector(1000000); c=0; s=Set(); q=0; for(p=1, 2000000, if(isprime(p), q+=p; v=divisors(q); for(i=1, length(v), if(setsearch(s, v[i])==0, c++; if(v[i]<1000000, a[v[i]]=c); print1(p, "M"); s=setunion(s, [v[i]]); break)))); m=0; i=1; while(a[i], if(a[i]>m, m=a[i]; print1(i, ", ")); i++) } (Klasen)
|
|
CROSSREFS
|
Sequence in context: A015771 A020492 A110590 this_sequence A070926 A124485 A125867
Adjacent sequences: A111268 A111269 A111270 this_sequence A111272 A111273 A111274
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
N. J. A. Sloane (njas(AT)research.att.com), Nov 03 2005
|
|
EXTENSIONS
|
More terms from Lambert Klasen (lambert.klasen(AT)gmx.net), Nov 08 2005
|
|
|
Search completed in 0.002 seconds
|
