%I #7 Jan 11 2020 13:36:34
%S 0,1,32,37,42,64,69,91,96,123,352,649,704,946,1001,1298,3097,3147,
%T 3232,3282,3367,3417,3502,3552,3602,3637,3687,3737,3772,3822,3872,
%U 3907,3957,4007,4092,4142,4227,4277,4362,4412,6144,6279,6414,6549
%N Product of n with 666 is palindromic.
%H Harvey P. Dale, <a href="/A030094/b030094.txt">Table of n, a(n) for n = 0..1000</a>
%t Select[Range[0,7000],PalindromeQ[# 666]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jan 11 2020 *)
%K nonn,base
%O 0,3
%A _Patrick De Geest_
|