|
%I #9 Aug 22 2021 12:16:15
%S 3,18,78,83,88,93,98,378,408,438,468,498,1878,1903,1928,1953,1978,
%T 2008,2033,2058,2083,2108,2138,2163,2188,2213,2238,2268,2293,2318,
%U 2343,2368,2398,2423,2448,2473,2498,9378,9528,9678
%N Base-5 palindromes that start with 3.
%t b5pQ[n_]:=Module[{idn5=IntegerDigits[n,5]},idn5[[1]]==3&&idn5 == Reverse[ idn5]]; Select[Range[10000],b5pQ] (* _Harvey P. Dale_, Mar 08 2018 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
