This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A108609 6-almost primes whose sum of factors is a prime. 3
 96, 224, 360, 416, 486, 504, 600, 608, 792, 810, 992, 1176, 1184, 1224, 1368, 1376, 1400, 1890, 1952, 2040, 2088, 2184, 2232, 2250, 2336, 2528, 2600, 2754, 2760, 2904, 2952, 3080, 3104, 3296, 3384, 3480, 3510, 3640, 3726, 4064, 4158, 4248, 4312, 4392 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 EXAMPLE 96=2*2*2*2*2*3 (6-almost prime) and 2+2+2+2+2+3=13 is a prime. MATHEMATICA Select[Range[8000], Last[Plus@@FactorInteger[ # ]]==6&&PrimeQ[Plus@@Times@@ Transpose[FactorInteger[ # ]]]&] sfp6Q[n_]:=Module[{pf=Flatten[Table[#[[1]], #[[2]]]&/@FactorInteger[n]]}, Length[ pf]==6&&PrimeQ[Total[pf]]]; Select[Range[4400], sfp6Q] (* Harvey P. Dale, Jul 01 2018 *) PROG (PARI) is(n)=my(f=factor(n)); sum(i=1, #f~, f[i, 2])==6 && isprime(sum(i=1, #f~, f[i, 1]*f[i, 2])) \\ Charles R Greathouse IV, Oct 11 2013 CROSSREFS Cf. A107707, A108607, A108608 (resp.) 3, 4, 5 (resp.)-almost primes whose sum of factors is a prime. Sequence in context: A241930 A270435 A110231 * A125511 A124106 A304510 Adjacent sequences:  A108606 A108607 A108608 * A108610 A108611 A108612 KEYWORD nonn AUTHOR Zak Seidov, Jun 12 2005 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
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 21 08:47 EDT 2019. Contains 328292 sequences. (Running on oeis4.)