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 A088950 #16 Feb 16 2025 08:32:51
%S A088950 0,0,0,0,1,0,0,0,1,1,0,0,1,2,1,0,0,1,1,0,0,0,1,0,1,1,2,2,1,1,1,1,0,0,
%T A088950 0,1,2,1,1,2,4,2,1,1,2,1,0,0,0,1,1,1,1,2,2,1,1,0,1,0,1,0,1,1,0,0,1,2,
%U A088950 1,0,1,1,2,1,1,1,2,1,2,2,4,4,2,2,1,2,1,1,1,2,2,2,1,1,2,1,0,0,1,1,0,1
%N A088950 Number of square-subwords in ternary representation of n.
%C A088950 A square-(sub)word consists of two nonempty identical adjacent subwords.
%H A088950 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/SquarefreeWord.html">Squarefree Word</a>
%e A088950 n=90: a(90)=2 because 90 -> '10100' has 2 square-subwords: 00 and 1010.
%t A088950 Table[SequenceCount[IntegerDigits[n, 3], {x__, x__}, Overlaps -> All], {n, 0, 100}] (* _Vladimir Reshetnikov_, May 17 2016 *)
%Y A088950 Cf. A007089, A088951, A088952.
%K A088950 nonn,base
%O A088950 0,14
%A A088950 _Reinhard Zumkeller_, Oct 25 2003