A085655 Difference between number of primes not exceeding reversed n and n.

0, 0, 0, 0, 0, 0, 0, 0, 0, -4, 0, 3, 5, 7, 9, 12, 13, 15, 16, -7, -3, 0, 2, 4, 6, 9, 11, 13, 14, -8, -5, -2, 0, 3, 5, 7, 9, 11, 12, -10, -7, -4, -3, 0, 2, 4, 6, 8, 9, -12, -9, -6, -5, -2, 0, 2, 5, 7, 7, -14, -12, -9, -7, -4, -2, 0, 2, 4, 5, -15, -13, -11, -9, -6, -5, -2, 0, 2, 3, -18, -15, -13, -11, -8, -7, -4, -2, 0, 1, -20, -16, -14, -12, -9, -7

Offset

1,10

Links

Michael De Vlieger, Table of n, a(n) for n = 1..10000

Formula

a(n) = pi(rev(n)) - pi(n).

a(n) = 0 for palindromic numbers.

Mathematica

Array[Subtract @@ PrimePi@ {IntegerReverse @#, #} &, 95] (* Michael De Vlieger, Mar 27 2020 *)

Prog

(PARI) a(n) = primepi(fromdigits(Vecrev(digits(n)))) - primepi(n); \\ Michel Marcus, Mar 27 2020

Crossrefs

Cf. A000720, A004086, A074719.

Sequence in context: A060568 A073466 A062525 * A338656 A153615 A352718

Adjacent sequences: A085652 A085653 A085654 * A085656 A085657 A085658

Keyword

base,sign

Author

Labos Elemer, Jul 10 2003

Status

approved