A043015 - OEIS

%I #11 Aug 22 2021 09:24:05

%S 1,8,50,57,64,71,78,85,92,344,400,456,512,568,624,680,2402,2451,2500,

%T 2549,2598,2647,2696,2752,2801,2850,2899,2948,2997,3046,3102,3151,

%U 3200,3249,3298,3347,3396,3452,3501,3550,3599,3648

%N Base-7 palindromes that start with 1.

%H Harvey P. Dale, <a href="/A043015/b043015.txt">Table of n, a(n) for n = 1..3000</a>

%t b7pQ[n_]:=Module[{idn7=IntegerDigits[n,7]},idn7[[1]]==1&&idn7== Reverse[ idn7]]; Select[Range[4000],b7pQ]

%K nonn,base

%O 1,2

%A _Clark Kimberling_