OFFSET
1,1
COMMENTS
First term 506240 = A098515(10).
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
506240=2^7*5*7*113, 506250=2*3^4*5^5;
789750=2*3^5*5^3*13, 789760=2^8*5*617;
1325312=2^8*31*167, 1325322=2*3^8*101;
1567350=2*3^6*5^2*43, 1567360=2^7*5*31*79.
PROG
(PARI) isok(n) = (bigomega(n) == 10) && (bigomega(n+10) == 10); \\ Michel Marcus, Oct 11 2013
(PARI) P=prod(i=1, 25, prime(i))^10; v=List(); for(n=1, 1e6, g1=gcd(n, P); o1=bigomega(g1); if(o1<5, next); g2=gcd(n+10, P); o2=bigomega(g2); if(o2>=5 && o1+bigomega(n/g1)==10 && o2+bigomega((n+10)/g2)==10, listput(v, n))); Vec(v) \\ Charles R Greathouse IV, Oct 11 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Nov 13 2006
EXTENSIONS
More terms from Michel Marcus, Oct 11 2013
STATUS
approved