cp's OEIS Frontend

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.

A240619 Positions of records in A240606.

This page as a plain text file.
%I A240619 #20 Apr 08 2020 08:04:24
%S A240619 1,3,5,10,24,27,169,408,18757,134418,295680,427684,737564,245340483,
%T A240619 1325085081,8036409193,152157373453,191309317101,2462443815565,
%U A240619 3205600889069,9743167666007,20076829452830
%N A240619 Positions of records in A240606.
%C A240619 The corresponding records are 0,2,3,4,5,6,7,12,16,...
%t A240619 A240606[n_] := Count[First[Split[Mod[Last[Transpose[FactorInteger[(2*n)!]]], 2]]], 0]; (* From _Peter J. C. Moses_ *)
%t A240619 k = -1; A240619 = {};
%t A240619 For[i = 1, i <= 2000, i++,
%t A240619 If[A240606[i] > k, k = A240606[i]; AppendTo[A240619, i]]]; A240619 (* _Robert Price_, Mar 26 2020 *)
%Y A240619 Cf. A240537, A240606.
%K A240619 nonn,more
%O A240619 1,2
%A A240619 _Vladimir Shevelev_, Apr 09 2014
%E A240619 a(10)-a(16) from _Hiroaki Yamanouchi_, Sep 30 2014
%E A240619 a(17)-a(22) from _Giovanni Resta_, Apr 07 2020