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.

A284089 Smallest number k such that gcd(phi(k), k-1) = n * lambda(k).

This page as a plain text file.
%I A284089 #26 Jun 28 2019 04:26:06
%S A284089 1,2465,314821,15841,658801,41041,21584305,8830801,8911,11205601,
%T A284089 3193414093,1729,9653421961,1193229577,1232469001,69331969,1419339691,
%U A284089 46657,587034735001,9439201,64774081,67047668161,100929219805,7995169,1894344001,212027401,67371265,3057601
%N A284089 Smallest number k such that gcd(phi(k), k-1) = n * lambda(k).
%C A284089 For n > 1, a(n) is a Carmichael number.
%C A284089 a(19) <= 587034735001. - _Giovanni Resta_, Mar 24 2017
%H A284089 Amiram Eldar, <a href="/A284089/b284089.txt">Table of n, a(n) for n = 1..138</a>
%t A284089 m=10; s=Table[0,{m}]; c=0; k=0; While[c<m, k++; If[IntegerQ[n = GCD[EulerPhi[k], k-1]/CarmichaelLambda[k]] && n<=m && s[[n]] == 0, c++; s[[n]]=k]]; s (* _Amiram Eldar_, Jun 26 2019 *)
%Y A284089 Cf. A000010, A002322, A002997, A049559, A264024.
%K A284089 nonn
%O A284089 1,2
%A A284089 _Altug Alkan_ and _Thomas Ordowski_, Mar 24 2017
%E A284089 a(7)-a(18) from _Giovanni Resta_, Mar 24 2017
%E A284089 a(19)-a(28) from _Amiram Eldar_, Jun 26 2019