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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A079477 First prime after phi(p_n^2). 1
3, 7, 23, 43, 113, 157, 277, 347, 509, 821, 937, 1361, 1657, 1811, 2179, 2767, 3433, 3671, 4423, 4973, 5261, 6163, 6823, 7841, 9319, 10103, 10513, 11351, 11777, 12659, 16007, 17033, 18637, 19183, 22063, 22651, 24499, 26407, 27733, 29759, 31873 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

The sequence always increases.

LINKS

G. C. Greubel, Table of n, a(n) for n = 1..10000

EXAMPLE

p_3=5, phi(5^2)=phi(25)=20, therefore a(3)=23

MATHEMATICA

Prime[1+PrimePi[EulerPhi[Prime[Range[41]]^2]]] - T. D. Noe, Nov 15 2006

PROG

(PARI) forprime (p=2, 200, print1(nextprime(eulerphi(p^2))", "))

CROSSREFS

Sequence in context: A133434 A122870 A216816 * A014426 A054270 A058000

Adjacent sequences:  A079474 A079475 A079476 * A079478 A079479 A079480

KEYWORD

nonn

AUTHOR

Jon Perry, Jan 15 2003

EXTENSIONS

Corrected by T. D. Noe, Nov 15 2006

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 August 22 11:34 EDT 2019. Contains 326176 sequences. (Running on oeis4.)