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 A145340 #10 Sep 16 2015 12:53:53 %S A145340 2,3,4,4,6,6,6,6,8,8,8,9,8,8,10,8,12,12,8,12,12,10,12,12,12,9,8,12,12, %T A145340 10,12,12,8,12,12,12,12,10,16,8,18,18,14,14,12,12,16,12,12,12,12,20, %U A145340 20,18,9,16,16,16,12,16,8,12,12,16,16,8,16,20,12,12,12,24,10,12,16,16,16 %N A145340 a(n) = the maximum of d(p(n)-1) and d(p(n)+1), where d(m) is the number of divisors of m and p(n) is the n-th prime. %t A145340 Table[Max[DivisorSigma[0, Prime[n]-1], DivisorSigma[0, Prime[n]+1]], {n, 1, 100}] (* _Stefan Steinerberger_, Oct 11 2008 *) %Y A145340 Cf. A145339, A008328, A008329, A067889, A103664, A103665. %K A145340 nonn %O A145340 1,1 %A A145340 _Leroy Quet_, Oct 08 2008 %E A145340 More terms from _Stefan Steinerberger_ and _Ray Chandler_, Oct 11 2008