OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
Every number from 1 to 28 inclusive belongs to this sequence as the number of primes less than or equal to k, for k <= 28, is a one-digit number, which is a palindrome.
MATHEMATICA
Select[Range[300], Reverse[IntegerDigits[PrimePi[ # ]]] == IntegerDigits[PrimePi[ # ]] &]
Position[PrimePi[Range[300]], _?(#==IntegerReverse[#]&)]//Flatten (* The program uses the IntegerReverse function from Mathematica version 10 *) (* Harvey P. Dale, Mar 02 2016 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Tanya Khovanova, Dec 13 2006
STATUS
approved