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 A246329 #14 Feb 04 2015 16:07:42 %S A246329 1,5,17,21,25,45,81,105,101,165,197,217,265,337,405,477,521,625,621, %T A246329 769,849,825,973,985,1089,1257,1229,1265,1401,1557,1677,1713,2081, %U A246329 2053,2177,2361,2389,2669,2621,2973,2901,3233,3249,3529,3809,3893,3765,3905,4409,4657,4757,4797,5321,5261,5769,5757,5997,6565,6597,6765 %N A246329 Total number of ON cells at stage 2n of two-dimensional 5-neighbor outer totalistic cellular automaton defined by "Rule 461". %C A246329 The number of ON cells at stage 2n+1 is infinite. %D A246329 S. Wolfram, A New Kind of Science, Wolfram Media, 2002; pp. 173-175. %H A246329 N. J. A. Sloane, <a href="/A246329/a246329.pdf">Illustration of first 24 generations</a> %H A246329 <a href="/index/Ce#cell">Index entries for sequences related to cellular automata</a> %t A246329 Map[Function[Apply[Plus, Flatten[ #1]]], CellularAutomaton[{ 461, {2, {{0, 2, 0}, {2, 1, 2}, {0, 2, 0}}}, {1, 1}}, {{{1}}, 0}, 130]] (* then take every other term *) %t A246329 ArrayPlot /@ CellularAutomaton[{461, {2, {{0, 2, 0}, {2, 1, 2}, {0, 2, 0}}}, {1, 1}}, {{{1}}, 0}, 23] %Y A246329 A bisection of A246332. %Y A246329 Cf. A169699, A246316, A246318, A246325, A246326, ... %K A246329 nonn %O A246329 0,2 %A A246329 _N. J. A. Sloane_, Aug 30 2014