A113797 Numbers k whose digits can be divided into two contiguous parts, k = concatenate(x, y), such that k = |x^2 - y^2|.

48, 100, 147, 3468, 10000, 10101, 13467, 16128, 34188, 140400, 190476, 216513, 300625, 334668, 416768, 484848, 530901, 1000000, 1010100, 1016127, 1034187, 1140399, 1190475, 1216512, 1300624, 1334667, 1416767, 1484847, 1530900

Offset

1,1

Links

Table of n, a(n) for n=1..29.

Example

3468 = |34^2 - 68^2|.

Mathematica

lst = {}; Do[p = 10; While[n > p, If[Abs[Mod[n, p]^2 - Floor[n/p]^2] == n, AppendTo[lst, n]]; p*=10], {n, 10^6}]; lst

Crossrefs

Sequence in context: A260001 A260241 A259994 * A260294 A260287 A187931

Adjacent sequences: A113794 A113795 A113796 * A113798 A113799 A113800

Keyword

base,nonn

Author

Giovanni Resta, Jan 21 2006

Status

approved