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.

A099633 Numbers k such that (phi(k-2) + phi(k+2))/2 = phi(k); 2-phi/balanced numbers.

This page as a plain text file.
%I A099633 #28 Nov 19 2022 14:51:08
%S A099633 5,10,14,20,25,50,80,154,200,434,520,610,815,1205,1345,2680,3200,3560,
%T A099633 4669,7330,9290,10130,11705,17630,24410,25090,33385,34205,39754,39785,
%U A099633 40870,48470,55979,59090,73165,75470,78035,95990,107680,115685,120230
%N A099633 Numbers k such that (phi(k-2) + phi(k+2))/2 = phi(k); 2-phi/balanced numbers.
%H A099633 Donovan Johnson, <a href="/A099633/b099633.txt">Table of n, a(n) for n = 1..499</a>
%e A099633 k=154, phi(152)=72, phi(156)=48, phi(154)=60.
%t A099633 Flatten[Position[Partition[EulerPhi[Range[121000]],5,1],_?((#[[1]]+ #[[5]]) /2 == #[[3]]&),{1},Heads->False]]+2 (* _Harvey P. Dale_, Jan 20 2015 *)
%o A099633 (PARI) isok(k) = (k>2) && (eulerphi(k-2)+eulerphi(k+2) == 2*eulerphi(k)); \\ _Michel Marcus_, Nov 18 2022
%Y A099633 Cf. A066167, A000010, A099631, A099632.
%K A099633 nonn
%O A099633 1,1
%A A099633 _Labos Elemer_, Oct 27 2004
%E A099633 Incorrect term 2 removed by _Michel Marcus_, Nov 19 2022