|
|
A093552
|
|
a(n) is the smallest number m such that m-k is product of k+1 primes for k=0,1,2,...,n.
|
|
6
|
|
|
|
OFFSET
|
0,1
|
|
COMMENTS
|
Each term of this sequence is prime.
|
|
LINKS
|
|
|
EXAMPLE
|
a(5)=392279 because:
392279 is prime;
392279-1 = 2*196139;
392279-2 = 3*229*571;
392279-3 = 2*2*281*349;
392279-4 = 5*5*13*17*71;
392279-5 = 2*3*3*19*31*37;
392279 is the smallest number m such that m-k is product of k+1 primes for k=0,1,2,3,4 & 5.
|
|
MATHEMATICA
|
Table[m = 1; While[Table[Plus @@ Last /@ FactorInteger[Prime[m] - k], {k, 0, n}] != Range[1, n + 1], m++]; Prime[m], {n, 0, 5}] (* Robert Price, Jun 09 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|