|
|
A085904
|
|
Numbers n such that n, n+1 and n+2 are highly composite numbers (2), i.e., all prime divisors <= 7 (A002473).
|
|
0
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
No more terms < 3*10^7. Probably no more terms. - David Wasserman, Feb 10 2005
|
|
LINKS
|
|
|
EXAMPLE
|
48 is a member as 48, 49 and 50 have all prime divisors <= 7.
|
|
PROG
|
(PARI) mx=2^180+2; v=vector(4607193); c=0; for(e1=0, 180, x1=2^e1; for(e2=0, 113, x2=x1*3^e2; if(x2>mx, next(2)); for(e3=0, 77, x3=x2*5^e3; if(x3>mx, next(2)); for(e4=0, 64, x4=x3*7^e4; if(x4>mx, next(2)); c++; v[c]=x4)))); v=vecsort(v); for(i=1, 4607191, if(v[i+1]-v[i]==1, if(v[i+2]-v[i]==2, print1(v[i] ", ")))) /* Donovan Johnson, Oct 10 2012 */
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,fini,full
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|