OFFSET
1,1
COMMENTS
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
For k = 32: k^2 = 1024, tau(1024) = 11, sigma(1024) = 2047 = 23*89.
For k = 243, k^2 = 59049, tau(59049) = 11, sigma(59049) = 88573 = 23*3851.
Up to 10000000, 453 terms were found.
MATHEMATICA
Do[ s=DivisorSigma[ 0, n^2 ]; y=DivisorSigma[ 1, n^2 ]; If[ Equal[ Length[ FactorInteger[ n ] ], 1 ]&&!PrimeQ[ n ] &&PrimeQ[ s ]&&!PrimeQ[ y ], Print[ n ] ], {n, 1, 10000000} ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Nov 19 2001
STATUS
approved