A116065 Numbers k, not ending in 0, such that k times its digital reverse gives a number made of nontrivial runs of identical digits.

88, 385, 583, 1426, 5236, 5929, 6241, 6325, 9295, 284213, 312482, 1001099, 9901001, 15046244, 44264051, 101127144, 176452305, 220741304, 403147022, 441721101, 469671917, 503254671, 719176964, 1110212002, 1111340003, 1315098605, 2002120111, 2024968033, 2433379564

Offset: 1

Author

Giovanni Resta, Feb 13 2006

Keywords

• nonn
• base
• changed

Comments

A run of length 1 is trivial.

Examples

			15046244 * 44264051 = 666007711774444.
5236 * 6325 = 33117700.
		

Crossrefs

Cf. A033023, A061205.

Programs

Mathematica

okQ[n_]:=Module[{idn=IntegerDigits[n],revnt},revnt=n FromDigits[Reverse[ idn]]; Last[idn]!=0&&Min[Length/@Split[ IntegerDigits[revnt]]]>1]; Select[Range[10^6],okQ] (* Harvey P. Dale, Jan 04 2012 *)

Extensions

Corrected and extended by Giovanni Resta, Aug 30 2025

Incorrect comment removed by Jason Yuen, Aug 30 2025