A085382 Sum of prime p and largest prime divisor of p-1.

7, 10, 16, 16, 19, 22, 34, 36, 36, 40, 46, 50, 70, 66, 88, 66, 78, 78, 76, 92, 124, 100, 100, 106, 120, 160, 112, 120, 134, 144, 154, 162, 186, 156, 170, 166, 250, 216, 268, 186, 210, 196, 204, 210, 218, 260, 340, 248, 262, 256, 246, 256, 259, 394, 336, 276, 300

Offset

5,1

Comments

There are few primes in this sequence. They the upper member of twin prime pairs of the form 2^x+1,2^x+3. since we are subtracting 1 from p this is only way a largest even prime divisor can occur namely 2 to add to a prime to get a prime which if it too is prime it will be a twin prime. The next one after 7,19 shown is 2^16+3 = 65539.

Links

Table of n, a(n) for n=5..61.

Prog

(PARI) cminuspm2(n) = \ prime + maxprime of prime-1 { forprime(x=5, n, forstep(p=x, 2, -1, if(isprime(p) & (x-1)%p==0, print1(x+p, ", "); break); ) ) }

Crossrefs

Sequence in context: A120136 A020743 A088350 * A083390 A234093 A287567

Adjacent sequences: A085379 A085380 A085381 * A085383 A085384 A085385

Keyword

easy,nonn

Author

Cino Hilliard, Aug 12 2003

Status

approved