A068897 Squares containing 2k digits in which the sum of the first k digits = that of the rest.

5041, 108900, 122500, 128164, 137641, 155236, 173056, 185761, 203401, 206116, 216225, 287296, 288369, 302500, 324900, 342225, 368449, 423801, 434281, 459684, 485809, 515524, 531441, 540225, 675684, 698896, 720801, 737881, 749956, 779689

Offset

1,1

Links

Andrew Howroyd, Table of n, a(n) for n = 1..10000

Example

5041 is a member with 5+0 = 4+1.

Prog

(PARI) isok(n)={my(d=digits(n)); my(k=#d); k%2==0 && vecsum(d[1..k/2]) == vecsum(d[k/2+1..k])}
lista(n)={my(L=List(), k=0); while(#L<n, k++; my(t=k^2); if(isok(t), listput(L, t))); Vec(L)} \\ Andrew Howroyd, Sep 19 2024

Crossrefs

Intersection of A000290 and A240927.

Cf. A068896, A068898.

Sequence in context: A271947 A045517 A369181 * A200730 A229674 A243133

Adjacent sequences: A068894 A068895 A068896 * A068898 A068899 A068900

Keyword

easy,nonn,base,changed

Author

Amarnath Murthy, Mar 21 2002

Extensions

Corrected and extended by Harvey P. Dale, Mar 31 2002

Offset changed by Andrew Howroyd, Sep 19 2024

Status

approved