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 A164931 #14 Jul 25 2021 10:56:27
%S A164931 1,4,9,20,35,66,91,136,171,230,319,372,481,574,645,752,901,1062,1159,
%T A164931 1340,1491,1606,1817,1992,2225,2522,2727,2884,3103,3270,3503,4064,
%U A164931 4323,4658,4865,5364,5587,5966,6357,6680,7093,7518,7783,8404,8685,9062,9353
%N A164931 n times the n-th noncomposite.
%C A164931 Does some n > 2 exist such that n * prime(n-1) / (n + prime(n-1)), i.e. a(n) / A090178(n) is an integer?
%C A164931 Complement of A171519. - _Jaroslav Krizek_, Dec 13 2009
%C A164931 Partial sums of A092929. - _Gionata Neri_, May 26 2015
%H A164931 Charles R Greathouse IV, <a href="/A164931/b164931.txt">Table of n, a(n) for n = 1..10000</a>
%F A164931 a(n) = n*A008578(n).
%t A164931 Module[{nn=200,cmps},cmps=Select[Range[nn],!CompositeQ[#]&];Times@@@ Thread[ {cmps,Range[Length[cmps]]}]] (* _Harvey P. Dale_, Jul 25 2021 *)
%o A164931 (PARI) a(n)=if(n>1,n*prime(n-1),1) \\ _Charles R Greathouse IV_, Jun 02 2015
%K A164931 nonn,easy
%O A164931 1,2
%A A164931 _Jaroslav Krizek_, Aug 31 2009
%E A164931 Correction for change of offset in A008578 by _Jaroslav Krizek_, Jan 27 2010