A251673 Numbers that are not palindromes, but whose squares are palindromes.

26, 264, 307, 836, 2285, 2636, 22865, 24846, 30693, 798644, 1042151, 1109111, 1270869, 2012748, 2294675, 3069307, 11129361, 12028229, 12866669, 30001253, 64030648, 110091011, 111091111, 306930693, 2062386218, 2481623254, 10106064399, 10109901101, 10110911101

Offset: 1

Author

Arkadiusz Wesolowski, Dec 06 2014

Keywords

• nonn
• base

Comments

The corresponding sequence excluding numbers in A059744 starts: 1109111, 110091011, 111091111, 10109901101, 10110911101, ....

The sequence is infinite, for instance it contains 111*100^k + 91*10^k + 111 for k > 3. - Emmanuel Vantieghem, Sep 30 2017

Crossrefs

Supersequence of A059744. Cf. A029742, A002778.

Programs

Magma

[n: n in [0..3069307] | not Intseq(n, 10) eq Reverse(Intseq(n, 10)) and Intseq(n^2, 10) eq Reverse(Intseq(n^2, 10))];

Mathematica

a251673[n_Integer] := Select[Range[n], IntegerDigits[#] != Reverse@IntegerDigits[#] && IntegerDigits[#^2] == Reverse@IntegerDigits[#^2] &]; a251673[10^7] (* Michael De Vlieger, Dec 14 2014 *)

PARI

for(n=1,10^6,d=digits(n);d2=digits(n^2);if(Vecrev(d2)==d2&&Vecrev(d)!=d,print1(n,", "))) \\ Derek Orr, Dec 13 2014

Formula

A029742 INTERSECT A002778.