OFFSET
1,3
COMMENTS
Sequence is probably finite.
Leading zeros in substring allowed so 52^2 = 140608 is rejected because 14{060}8 contains a palindromic substring.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1001
EXAMPLE
132651 (= 51^3) -> substrings 13, 32, 26, 65, 51, 132, 326, 265, 651, 1326, 3265, 2651, 13265, 32651 and 132651 are all non-palindromic.
MATHEMATICA
npsQ[n_]:=Count[Flatten[Table[Partition[IntegerDigits[n], i, 1], {i, 2, IntegerLength[ n]}], 1], _?(#==Reverse[#]&)]==0; Select[Range[ 0, 100]^3, npsQ] (* Harvey P. Dale, Dec 10 2016 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Jan 15 2000
EXTENSIONS
Offset changed to 1 by Sean A. Irvine, Oct 17 2019
STATUS
approved