OFFSET
0,1
LINKS
Robert Israel, Table of n, a(n) for n = 0..998
Gwillim Law, blog post, Dec. 12, 2015
FORMULA
EXAMPLE
a(0) = 6 = 4^2 - 10; a(1) = 24 = 32^2 - 1000.
MAPLE
f:= proc(n) local s;
s:= isqrt(10^(2*n+1));
if s^2 < 10^(2*n+1) then s:= s+1 fi;
s^2 - 10^(2*n+1)
end proc:
seq(f(n), n=0..40); # Robert Israel, Jan 17 2016
MATHEMATICA
dsis[n_]:=Module[{c=10^(2n+1)}, (Floor[Sqrt[c]]+1)^2-c]; Array[dsis, 20, 0] (* Harvey P. Dale, Apr 27 2019 *)
PROG
(Python)
from math import isqrt
def A267032(n): return (isqrt(m:=10**((n<<1)+1))+1)**2-m # Chai Wah Wu, Apr 27 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Gwillim Law, Jan 09 2016
STATUS
approved