login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A085842 Numbers n whose divisors (apart from 1 and n) sum to a prime. 1
4, 6, 9, 10, 22, 25, 30, 34, 42, 49, 58, 60, 70, 78, 82, 84, 102, 118, 120, 121, 138, 142, 168, 169, 186, 198, 202, 214, 216, 220, 222, 228, 234, 238, 240, 246, 258, 270, 274, 280, 282, 289, 294, 298, 348, 358, 360, 361, 364, 370, 372, 382, 390, 394, 406, 414, 438, 442, 444 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..59.

EXAMPLE

102 is a member since the divisors of 102 are {1, 2, 3, 6, 17, 34, 51, 102} and 2 + 3 + ... + 51 = 113, a prime.

MAPLE

with(numtheory); b := []; for n from 3 to 2000 do t1 := divisors(n); t2 := convert(t1, list); t3 := add(t2[i], i=1..nops(t2)); if isprime(t3-1-n) then b := [op(b), n]; fi; od: b;

MATHEMATICA

f[n_]:=Plus@@Divisors[n]-n-1; lst={}; Do[a=f[n]; If[PrimeQ[a], AppendTo[lst, n]], {n, 7!}]; lst (* Vladimir Joseph Stephan Orlovsky, Sep 21 2009 *)

CROSSREFS

Cf. A037020.

Sequence in context: A215478 A118693 A084668 * A131220 A209920 A258979

Adjacent sequences:  A085839 A085840 A085841 * A085843 A085844 A085845

KEYWORD

nonn

AUTHOR

Chuck Seggelin (barkeep(AT)plastereddragon.com), Jul 05 2003

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified March 23 04:15 EDT 2017. Contains 283901 sequences.