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 A141299 #12 Oct 24 2017 02:30:55 %S A141299 0,0,2,2,2,2,5,5,4,6,3,4,3,5,9,9,7,7,5,7,11,7,6,7,5,7,6,7,6,9,14,14, %T A141299 11,10,8,12,10,8,8,10,10,17,12,8,12,10,10,11,8,8,8,8,12,12,8,10,8,10, %U A141299 8,11,10,14,20,20,16,14,12,14,13,11,11,14,19,14,11,13,11,11,12,14,13,14,11 %N A141299 a(n) = number (with repetition) of (not necessarily distinct) substrings in the binary representation of n that each occur multiple times. %C A141299 Substrings may start with a 0. %H A141299 Michael De Vlieger, <a href="/A141299/b141299.txt">Table of n, a(n) for n = 1..16384</a> %e A141299 0,0,1,1,10,10 each occur multiple times in binary 1010 = decimal 10. So a(10) = 6. %t A141299 Array[Function[d, Total@ Select[Tally@ Apply[Join, Map[Partition[d, #, 1] &, Range[Length@ d - 1]]], Last@ # > 1 &][[All, -1]]]@ IntegerDigits[#, 2] &, 83] (* _Michael De Vlieger_, Oct 23 2017 *) %Y A141299 Cf. A141297, A141298, A141300. %K A141299 nonn %O A141299 1,3 %A A141299 _Leroy Quet_, Jun 24 2008 %E A141299 Extended by _Ray Chandler_, Jun 25 2009