A043082 (s(n)+7)/10, where s(n)=n-th base 10 palindrome that starts with 3.

1, 4, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 301, 312, 323, 334, 345, 356, 367, 378, 389, 400, 3001, 3011, 3021, 3031, 3041, 3051, 3061, 3071, 3081, 3091, 3102, 3112, 3122, 3132, 3142, 3152, 3162, 3172, 3182, 3192, 3203, 3213

Offset

1,2

Links

Table of n, a(n) for n=1..44.

Mathematica

palQ[n_]:=Module[{idn=IntegerDigits[n]}, idn==Reverse[idn]]; (#+7)/10&/@ Select[Range[40000], palQ[#]&&First[IntegerDigits[#]]==3&] (* Harvey P. Dale, Nov 29 2014 *)

Crossrefs

Sequence in context: A196246 A345274 A025416 * A371034 A216302 A070522

Adjacent sequences: A043079 A043080 A043081 * A043083 A043084 A043085

Keyword

nonn,base

Author

Clark Kimberling

Status

approved