A290425 Primes p such that the reverse of 4*p is the nextprime(p+1).

23, 233, 2333, 23333

Offset: 1

Author

David James Sycamore, Jul 31 2017

Keywords

• nonn
• base
• more

Comments

From David A. Corneth, Aug 02 2017: (Start)

23333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333 is a term.

Terms start with 2 and end in 3. Proof (for base 10):

Let d[1] be the first digit of term p. Then 1 <= d[1] <= 9. Let r be the reverse of 4*p. If d[1] > 2 then r is too large to be nextprime(p + 1). if p = 1 then 4*p starts with 5 or 6 i.e. r ends in 5 or 6. No terms can match these conditions so d[1] = 2. If d[1] = 2 then p ends in 3 or 8. As primes don't end in 8, p ends in 3. (End)

Examples

			p(9)=23, 4*23=92;  29=p(10).
		

Crossrefs

Cf. A093672, A198972.

Programs

Mathematica

Select[Prime@ Range[10^6], NextPrime@ # == IntegerReverse[4 #] &] (* Michael De Vlieger, Aug 02 2017 *)

PARI

is(n) = isprime(n) && fromdigits(Vecrev(digits(4*n))) == nextprime(n+1) \\ David A. Corneth, Aug 02 2017