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

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A058652 Squarefree n such that sigma(phi(n)) = phi(sigma(n)). 0
29262, 114630, 160986, 179562, 252978, 502878, 528954, 780258, 908070, 1080906, 1826454, 2460786, 2870142, 3934686, 5086722, 5493030, 6001206, 6183078, 6621270, 6668634, 8808234, 9298110, 9752190 (list; graph; refs; listen; history; internal format)
OFFSET

1,1

MATHEMATICA

Select[ Range[ 10^7 ], DivisorSigma[ 1, EulerPhi[ # ] ] == EulerPhi[ DivisorSigma[ 1, # ] ] && Union[ Transpose[ FactorInteger[ # ] ] [ [ 2 ] ] ] == {1} & ]

CROSSREFS

Cf. A033632.

Sequence in context: A028462 A206470 A194619 * A186566 A083740 A083739

Adjacent sequences:  A058649 A058650 A058651 * A058653 A058654 A058655

KEYWORD

nonn

AUTHOR

Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 26 2000

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 17 14:50 EST 2012. Contains 206050 sequences.