This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A188982 #22 Mar 17 2023 09:55:34
%S A188982 0,2,12,46,120,122,828,6554,28560,86158,145668,246046,3369960,
%T A188982 17021162,58317492,128629846,13651680,1590277918,9719139348,
%U A188982 37641223154,99498527400,107655263398,647549275812,5284814079046,23290743888720,71041880304722,123471611274972,182714776311554,2701419604443960,13833225534613558,47880898349909868
%N A188982 Even numbers x such that x^2 + y^2 = 13^n with x and y coprime.
%C A188982 The y values are in A188983.
%C A188982 This is also the absolute value of the imaginary part of (3+2i)^n, where i = sqrt(-1).
%H A188982 Vincenzo Librandi, <a href="/A188982/b188982.txt">Table of n, a(n) for n = 0..183</a>
%t A188982 Table[s = Select[PowersRepresentations[13^n, 2, 2], CoprimeQ @@ # &, 1][[1]]; Select[s, EvenQ][[1]], {n, 0, 30}]
%o A188982 (Magma) [Integers()!Abs(Im((3+2*Sqrt(-1))^n)): n in [0..30]]; // _Bruno Berselli_, May 26 2011
%Y A188982 Cf. A158936, A188983.
%K A188982 nonn
%O A188982 0,2
%A A188982 _T. D. Noe_, Apr 14 2011