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.

A166257 Odd numbers not of the form prime(k) + phi(prime(k)).

This page as a plain text file.
%I A166257 #14 Jan 31 2025 09:25:12
%S A166257 1,7,11,15,17,19,23,27,29,31,35,39,41,43,47,49,51,53,55,59,63,65,67,
%T A166257 69,71,75,77,79,83,87,89,91,95,97,99,101,103,107,109,111,113,115,119,
%U A166257 123,125,127,129,131,135,137,139,143,147,149,151,153,155,159,161,163,167
%N A166257 Odd numbers not of the form prime(k) + phi(prime(k)).
%H A166257 Harvey P. Dale, <a href="/A166257/b166257.txt">Table of n, a(n) for n = 1..1000</a>
%F A166257 {1} U {A005408 \ A076274 }. - _R. J. Mathar_, May 21 2010
%p A166257 L := 100; S := {}:
%p A166257 for i from 2 to L do
%p A166257   for j from 2 to L do
%p A166257     if i*j <= L then S := `union`(S, {2*i*j-1}) end if;
%p A166257   end do;
%p A166257 end do:
%p A166257 {1} union S; # _Peter Bala_, Jan 30 2025
%t A166257 Module[{upto=200},Complement[Range[1,upto,2],Table[n+EulerPhi[n],{n,Prime[ Range[PrimePi[upto]]]}]]] (* _Harvey P. Dale_, Jun 21 2019 *)
%Y A166257 Cf. A000010, A000040, A005408.
%K A166257 nonn,easy
%O A166257 1,2
%A A166257 _Juri-Stepan Gerasimov_, Oct 10 2009
%E A166257 Entries checked by _R. J. Mathar_, May 21 2010.