[go: up one dir, main page]

login
A043082
(s(n)+7)/10, where s(n)=n-th base 10 palindrome that starts with 3.
0
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
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
KEYWORD
nonn,base
STATUS
approved