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 A212245 #8 Oct 21 2022 19:46:09
%S A212245 0,0,0,4,12,15,21,36,45,46,64,76,88,91,114,120,144,156,153,186,204,
%T A212245 201,235,235,268,271,289,316,334,340,361,382,408,408,444,465,465,489,
%U A212245 519,525,576,573,589,616,652,640,664,709,736,748,760,778,826,808
%N A212245 Number of (w,x,y,z) with all terms in {1,...,n} and w = x*y*z - 2*n.
%C A212245 For a guide to related sequences, see A211795.
%t A212245 t = Compile[{{n, _Integer}}, Module[{s = 0},
%t A212245 (Do[If[w == x*y*z - 2 n, s = s + 1],
%t A212245 {w, 1, #}, {x, 1, #}, {y, 1, #}, {z, 1, #}] &[n]; s)]];
%t A212245 Map[t[#] &, Range[0, 60]] (* A212245 *)
%t A212245 (* _Peter J. C. Moses_, Apr 13 2012 *)
%Y A212245 Cf. A211795.
%K A212245 nonn
%O A212245 0,4
%A A212245 _Clark Kimberling_, May 08 2012