login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A062533 a(n) = A000010(A014076(n)). 1
1, 6, 8, 12, 20, 18, 20, 24, 24, 24, 42, 32, 40, 36, 36, 48, 44, 40, 60, 54, 64, 56, 72, 60, 72, 60, 48, 72, 88, 72, 96, 110, 80, 100, 84, 108, 72, 92, 120, 112, 84, 96, 120, 104, 132, 80, 156, 108, 120, 116, 120, 144, 160, 108, 96, 132, 168, 160, 132, 180, 140, 168 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

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

MATHEMATICA

A014076 := Select[Range[1, 350, 2], PrimeOmega[#] != 1 &]; Table[ EulerPhi[A014076[[n]]], {n, 1, 50}] (* G. C. Greubel, Sep 17 2017 *)

PROG

(PARI) je=[]; forstep(n=1, 301, 2, if(isprime(n), n+1, je=concat(je, eulerphi(n)))); je

CROSSREFS

Sequence in context: A315866 A027691 A146529 * A315867 A315868 A315869

Adjacent sequences:  A062530 A062531 A062532 * A062534 A062535 A062536

KEYWORD

easy,nonn

AUTHOR

Jason Earls, Jul 10 2001

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 13 06:22 EDT 2020. Contains 336442 sequences. (Running on oeis4.)