id:A058652 - OEIS Search Results

Search: id:A058652

Displaying 1-1 of 1 results found.

page 1

Square-free n such that sigma(phi(n)) = phi(sigma(n)).

+0
1

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; listen)

	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: A015313 A152939 A028462 this_sequence A083740 A083739 A022200` `Adjacent sequences: A058649 A058650 A058651 this_sequence A058653 A058654 A058655`
	KEYWORD	`nonn`
	AUTHOR	`Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 26 2000`

page 1

Search completed in 0.002 seconds

Last modified December 4 23:11 EST 2009. Contains 170347 sequences.

AT&T Labs Research