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.

A346587 Value of k for incrementally largest value of k/A002322(k), where A002322 is the Carmichael function.

This page as a plain text file.
%I A346587 #10 Aug 20 2021 18:44:56
%S A346587 1,2,6,8,12,24,60,80,120,240,504,1040,1092,1170,1260,1365,1456,1560,
%T A346587 1638,1680,1820,1872,2184,2340,2520,2730,3120,3276,3640,4095,4368,
%U A346587 4680,5040,5460,6552,7280,8190,9360,10920,13104,16380,21840,32760,65520
%N A346587 Value of k for incrementally largest value of k/A002322(k), where A002322 is the Carmichael function.
%t A346587 max=0;lst={};Do[t=k/CarmichaelLambda@k;If[t>max,AppendTo[lst,k];max=t],{k,100000}];lst (* _Giorgos Kalogeropoulos_, Jul 26 2021 *)
%o A346587 (PARI) f(n) = lcm(znstar(n)[2]); \\ A002322
%o A346587 lista(nn) = {my(m=0, x, list=List()); for (n=1, nn, if ((x = n/f(n)) > m, m = x; listput(list, n));); Vec(list);} \\ _Michel Marcus_, Aug 04 2021
%Y A346587 Cf. A002322.
%K A346587 nonn,easy
%O A346587 1,2
%A A346587 _Sofia Lacerda_, Jul 24 2021