login
A035135
Cubefree composite palindromes.
2
4, 6, 9, 22, 33, 44, 55, 66, 77, 99, 111, 121, 141, 161, 171, 202, 212, 222, 242, 252, 262, 282, 292, 303, 323, 333, 363, 393, 404, 414, 434, 444, 454, 474, 484, 494, 505, 515, 525, 535, 545, 555, 565, 575, 585, 595, 606, 626, 636, 646, 666, 676, 707, 717
OFFSET
1,1
LINKS
Eric Weisstein's World of Mathematics, Cubefree.
MATHEMATICA
cufQ[n_]:=Max[Transpose[FactorInteger[n]][[2]]]<=2; palQ[n_]:=FromDigits[Reverse[IntegerDigits[n]]]==n; Select[Range[2, 718], !PrimeQ[#] && cufQ[#] && palQ[#] &] (* Jayanta Basu, May 12 2013 *)
CROSSREFS
Intersection of A002113, A002808 and A004709.
Sequence in context: A257842 A239307 A137253 * A046338 A118690 A084994
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Nov 15 1998
STATUS
approved