login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A064805 Numbers k such that phi(k) > phi(k+2). 1
13, 16, 19, 22, 23, 25, 28, 31, 34, 37, 38, 40, 43, 46, 47, 49, 52, 53, 55, 58, 61, 64, 67, 68, 73, 76, 79, 82, 83, 85, 86, 88, 89, 91, 94, 97, 98, 100, 103, 106, 109, 112, 113, 115, 118, 121, 124, 127, 128, 130, 131, 133, 134, 136, 139, 142, 143, 145, 148, 151, 152 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Harry J. Smith, Table of n, a(n) for n = 1..1000

MATHEMATICA

Select[ Range[150], EulerPhi[ # ] > EulerPhi[ #+2 ] & ]

Position[Partition[EulerPhi[Range[200]], 3, 1], _?(First[#]>Last[#]&), 1, Heads->False]//Flatten (* Harvey P. Dale, Jun 14 2017 *)

PROG

(PARI) { n=0; for (m=1, 10^9, f=eulerphi(m); if (eulerphi(m)>eulerphi(m + 2), write("b064805.txt", n++, " ", m); if (n==1000, return)) ) } \\ Harry J. Smith, Sep 26 2009

CROSSREFS

Cf. A001837.

Sequence in context: A172975 A058225 A295744 * A246451 A295327 A179202

Adjacent sequences:  A064802 A064803 A064804 * A064806 A064807 A064808

KEYWORD

easy,nonn

AUTHOR

Robert G. Wilson v, Oct 21 2001

EXTENSIONS

a(60)-a(61) from Harry J. Smith, Sep 26 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 20 20:12 EDT 2019. Contains 328272 sequences. (Running on oeis4.)