login
Numbers n such that n*(n-1) is an oblong (promic, A002378) palindrome.
0

%I #9 May 09 2022 15:12:44

%S 1,2,3,17,78,539,1622,2458,5292,5314,52009,142402,143499,1610152,

%T 1713544,4670029,5218984,15137567,15282412,15814149,47370059,50702752,

%U 142594227,166691109,1694576062,2554554553,25541432473,47878213559,77714915543

%N Numbers n such that n*(n-1) is an oblong (promic, A002378) palindrome.

%t Do[c=RealDigits[n*(n-1)][[1]]; If[c=Reverse[c], Print[n]], {n, 1, 10^8}]

%o (PARI) is(n)=my(d=digits(n^2-n)); d==Vecrev(d) \\ _Charles R Greathouse IV_, Mar 16 2022

%Y Cf. A002378.

%K nonn,base

%O 1,2

%A _Robert G. Wilson v_, Aug 21 2000

%E More terms from _Sean A. Irvine_, May 09 2022