|
Search: id:A093038
|
|
|
| A093038 |
|
Numbers n such that sum of 5th powers of divisors of n is divisible by the square of Euler-phi of n. |
|
+0
1
|
| |
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
No more terms through 10^9. - Ryan Propper (rpropper(AT)stanford.edu), Jan 09 2007
|
|
FORMULA
|
A001160[n]/A000010[n]^2 is integer.
|
|
MATHEMATICA
|
Do[ If[ Mod[ DivisorSigma[5, n], EulerPhi[n]^2] == 0, Print[n]], {n, 10^7}] (from Robert G. Wilson v May 23 2004)
|
|
CROSSREFS
|
Cf. A015763, A000010, A091285.
Sequence in context: A018769 A015770 A015762 this_sequence A094469 A015766 A117024
Adjacent sequences: A093035 A093036 A093037 this_sequence A093039 A093040 A093041
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), May 19 2004
|
|
|
Search completed in 0.002 seconds
|
