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.

A083255 Odd composite numbers k such that cototient(k) - phi(k) = k - 2*phi(k) is an odd prime.

This page as a plain text file.
%I A083255 #21 Mar 25 2021 04:52:41
%S A083255 165,195,5187,5865,7395,10005,15045,16215,21165,22695,27285,37995,
%T A083255 42585,44115,50235,57885,59415,60945,64005,310845,346035,347565,
%U A083255 486795,635205,707115,890445,979455,994755,1049835,1070535,1078815,1083585,1121745
%N A083255 Odd composite numbers k such that cototient(k) - phi(k) = k - 2*phi(k) is an odd prime.
%C A083255 Quite a number of terms are divisible by 3*5*17 = 255.
%H A083255 Amiram Eldar, <a href="/A083255/b083255.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..369 from R. J. Mathar)
%e A083255 m = 17425605 = 3*5*23*53*953 is a term since cototient(m) - phi(m) = 9712901 - 8712704 = 197 is an odd prime.
%t A083255 Do[s=EulerPhi[n]; c=n-s; If[Greater[c, s]&&PrimeQ[c-s]&&OddQ[c-s]&&!PrimeQ[n], Print[{n, c-s, n/255}]], {n, 1, 10000000}]
%Y A083255 Cf. A000010, A051953, A036798, A067800, A083254.
%K A083255 nonn
%O A083255 1,1
%A A083255 _Labos Elemer_, May 08 2003