|
| |
|
|
A157487
|
|
Numbers n such that n-+1 are divisible by exactly 7 primes, counted with multiplicity.
|
|
0
| |
|
|
10529, 15391, 17983, 18751, 22049, 23489, 24751, 26081, 29249, 32561, 35153, 43471, 49951, 52975, 58049, 58481, 67229, 67231, 70687, 71873, 72415, 76049, 77921, 79001, 79649, 82783, 83249, 85751, 88289, 93799, 95551, 97471, 102545
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MAPLE
| with(numtheory): a := proc (n) if bigomega(n-1) = 7 and bigomega(n+1) = 7 then n else end if end proc: seq(a(n), n = 2 .. 120000); [From Emeric Deutsch (deutsch(AT)duke.poly.edu), Mar 07 2009]
|
|
|
MATHEMATICA
| q=7; lst={}; Do[If[Plus@@Last/@FactorInteger[n-1]==q&&Plus@@Last/@FactorInteger[n+1]==q, AppendTo[lst, n]], {n, 9!}]; lst
|
|
|
CROSSREFS
| Cf. A124936, A014612, A157483, A157484, A157485, A157486
Sequence in context: A171352 A206322 A120500 * A203666 A119866 A065319
Adjacent sequences: A157484 A157485 A157486 * A157488 A157489 A157490
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Vladimir Orlovsky (4vladimir(AT)gmail.com), Mar 01 2009
|
|
|
EXTENSIONS
| More terms from Emeric Deutsch (deutsch(AT)duke.poly.edu), Mar 07 2009
|
| |
|
|
