This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A274360 #5 Jun 19 2016 19:52:22 %S A274360 6075,23275,25856,26900,33524,45324,46475,61299,61347,77076,82075, %T A274360 93924,96236,107775,111924,117324,118700,133524,137924,155771,209524, %U A274360 210176,219275,229275,230643,234099,257724,258475,272924,275300,278271,312987,325899,332667,348524 %N A274360 Numbers n such that n and n+1 both have 18 divisors. %H A274360 Charles R Greathouse IV, <a href="/A274360/b274360.txt">Table of n, a(n) for n = 1..10000</a> %o A274360 (PARI) is(n)=numdiv(n)==18 && numdiv(n+1)==18 %o A274360 (PARI) list(lim)=my(v=List()); forprime(p=2,sqrtint(lim\12), forprime(q=2,sqrtint(lim\p^2\2), if(p==q,next); my(pq2=(p*q)^2); forprime(r=2,lim\pq2, if(p==r || q==r, next); t=pq2*r; if(numdiv(t-1)==18, listput(v,t-1)); if(numdiv(t+1)==18, listput(v,t))))); Set(v) %Y A274360 Intersection of A005237 and A030636. %Y A274360 Cf. A000005, A274357. %K A274360 nonn %O A274360 1,1 %A A274360 _Charles R Greathouse IV_, Jun 19 2016