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 A171614 #7 Apr 01 2019 16:55:10 %S A171614 0,1,2,3,5,7,8,9,14,15,17,20,21,22,24,25,29,36,37,39,42,45,46,47,49, %T A171614 51,53,54,58,61,63,65,66,67,68,72,73,74,77,78,79,80,83,84,87,88,89,91, %U A171614 92,93,96,104,105,107,108,109,110,111,112,113,115,117,119,124,125,127,128 %N A171614 Numbers n with property that (n^2 + sum of the digits of n^2) is even. %C A171614 Or, n's such that A171613(n) is even. %t A171614 Union@Table[If[EvenQ[n^2+Total[IntegerDigits[n^2]]],n,0],{n,0,200}] %t A171614 Select[Range[0,200],EvenQ[#^2+Total[IntegerDigits[#^2]]]&] (* _Harvey P. Dale_, Apr 01 2019 *) %Y A171614 Cf. A062028, A171613, A171615. %K A171614 base,nonn %O A171614 1,3 %A A171614 _Zak Seidov_, Dec 13 2009