|
%I #6 Dec 20 2018 14:11:37
%S 94649,94849,94949,96469,98689,9446449,9686869,9888889,9889889,
%T 9896989,9989899,944999449,946666649,946999649,948898849,964444469,
%U 964989469,966848669,968646869,968666869,968868869,968898869,968999869,986444689
%N Palindromic primes with only composite digits (i.e.,4,6,8,9).
%C Subsequence of A128375.
%t Select[Flatten[Table[FromDigits/@Tuples[{4,6,8,9},n],{n,9}]],PalindromeQ[ #] && PrimeQ[#]&] (* _Harvey P. Dale_, Dec 20 2018 *)
%Y Cf. A002385, A083185.
%K nonn,base,less
%O 1,1
%A _Lekraj Beedassy_, Feb 27 2007
%E Corrected by _Ray Chandler_, Feb 28 2007
|
