A114777 a(n) = floor( {n concatenated with n n times }^(1/2) * 10 )^2.

100, 2116, 33124, 443556, 5555449, 66650896, 777740544, 8888718400, 99999515529, 1010101010089161070864, 111111111110888888888889, 12121212121205459165906769, 1313131313131245483985582729, 141414141414141058690681961329, 15151515151515144862248400372996

Offset

1,1

Links

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

Formula

Floor[ {n concatenated with n n times }^(1/2)*10]^2 - Michael Keagel (mjk374(AT)psu.edu), Feb 12 2006

Example

a(3) = floor(333^(1/2)*10)^2 = 33124.

Maple

a:= n-> floor(sqrt(parse(cat(n$n)))*10)^2:
seq(a(n), n=1..15);  # Alois P. Heinz, Nov 13 2024

Mathematica

Table[Floor[10 *Surd[FromDigits[Flatten[IntegerDigits/@ PadRight[ {}, n, n]]], 2]]^2, {n, 15}] (* Georg Fischer, Nov 13 2024 *)

Crossrefs

Cf. A114776.

Sequence in context: A203283 A231139 A295589 * A128988 A075822 A250845

Adjacent sequences: A114774 A114775 A114776 * A114778 A114779 A114780

Keyword

base,nonn

Author

Amarnath Murthy, Nov 17 2005

Extensions

Corrected and extended by Michael Keagel (mjk374(AT)psu.edu), Feb 12 2006

Offset changed to 1; a(12) corrected and more terms from Georg Fischer, Nov 13 2024

Status

approved