|
| |
|
|
A065820
|
|
Numbers n such that Sigma6(n)/Sigma2(n) is prime.
|
|
1
| |
|
|
2, 3, 5, 13, 17, 31, 43, 61, 83, 109, 131, 229, 239, 257, 263, 269, 311, 313, 443, 463, 503, 571, 593, 599, 619, 641, 647, 653, 659, 701, 797, 811, 853, 953, 967, 1009, 1031, 1039, 1063, 1123, 1373, 1459, 1483, 1499, 1663, 1669, 1693, 1733, 1741, 1759, 1789
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,1000
|
|
|
EXAMPLE
| All entries are themselves prime.
|
|
|
MATHEMATICA
| Select[Range[1, 2000 ], PrimeQ[( DivisorSigma[6, # ])/DivisorSigma[2, # ]] & ]
|
|
|
PROG
| (PARI) { n=0; for (m=1, 10^9, f=sigma(m, 6)/sigma(m, 2); if (frac(f) == 0 && isprime(f), write("b065820.txt", n++, " ", m); if (n==1000, return)) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Oct 31 2009]
|
|
|
CROSSREFS
| Sequence in context: A154554 A105879 A066111 * A163268 A108562 A087523
Adjacent sequences: A065817 A065818 A065819 * A065821 A065822 A065823
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 06 2001
|
| |
|
|
