|
Search: id:A065985
|
|
|
| A065985 |
|
Numbers n such that d(n) / 2 is prime, where d(n) = number of divisors of n. |
|
+0
1
|
|
| 6, 8, 10, 12, 14, 15, 18, 20, 21, 22, 26, 27, 28, 32, 33, 34, 35, 38, 39, 44, 45, 46, 48, 50, 51, 52, 55, 57, 58, 62, 63, 65, 68, 69, 74, 75, 76, 77, 80, 82, 85, 86, 87, 91, 92, 93, 94, 95, 98, 99, 106, 111, 112, 115, 116, 117, 118, 119, 122, 123, 124, 125, 129, 133, 134
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Harry J. Smith, Table of n, a(n) for n=1,...,1000
|
|
MATHEMATICA
|
Select[Range[1, 1000], PrimeQ[DivisorSigma[0, # ] / 2] == True &]
|
|
PROGRAM
|
(PARI) { n=0; for (m=1, 10^9, f=numdiv(m)/2; if (frac(f)==0 && isprime(f), write("b065985.txt", n++, " ", m); if (n==1000, return)) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Nov 05 2009]
|
|
CROSSREFS
|
Sequence in context: A131181 A064176 A000379 this_sequence A060652 A020739 A064466
Adjacent sequences: A065982 A065983 A065984 this_sequence A065986 A065987 A065988
|
|
KEYWORD
|
nonn,new
|
|
AUTHOR
|
Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Dec 10 2001
|
|
|
Search completed in 0.002 seconds
|
