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.

A144742 Integers m such that phi(2, m) = A144740(m) > phi(2, k) for 0 < k < m.

This page as a plain text file.
%I A144742 #20 Jan 30 2020 07:02:12
%S A144742 5,7,11,17,23,29,37,41,47,53,59,67,71,79,83,89,97,107,113,127,131,137,
%T A144742 149,157,163,167,173,179,191,197,211,223,227,239,251,257,263,269,277,
%U A144742 281,293,307,311,317,331,337,347,359,367,373,379,383,389,397,401,409
%N A144742 Integers m such that phi(2, m) = A144740(m) > phi(2, k) for 0 < k < m.
%C A144742 Subset of the primes (A000040).
%C A144742 Except for 5 and 7, if one member of a twin prime pair is included, the other is not.
%H A144742 Amiram Eldar, <a href="/A144742/b144742.txt">Table of n, a(n) for n = 1..10000</a>
%t A144742 phi2[n_] := phi2[n] = Count[Range[n-1], _?(Total[Last /@ FactorInteger[#]] == 2 && CoprimeQ[#, n] &)];
%t A144742 Select[Range[300], And @@ Table[phi2[#] > phi2[k], {k, #-1}] &]
%t A144742 (* _Andrey Zabolotskiy_, Sep 09 2019 *)
%Y A144742 Cf. A000040, A001097, A144740.
%Y A144742 A005385 is a subsequence.
%K A144742 easy,nonn
%O A144742 1,1
%A A144742 _Reikku Kulon_, Sep 20 2008