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 A048318 #8 Oct 13 2019 16:33:59 %S A048318 0,1,2,3,4,5,6,8,16,24,32,40,48,56,57,58,59,60,61,62,112,113,114,115, %T A048318 116,117,118,168,169,170,171,172,173,174,224,225,226,227,228,229,230, %U A048318 280,281,282,283,284,285,286,336,337,338,339,340,341,342,399,400,401 %N A048318 Numbers whose base-7 expansions, read from left to right, have run lengths that strictly decrease. %t A048318 Select[Range[0,500],Max[Differences[Length/@Split[IntegerDigits[ #, 7]]]]<0&] (* _Harvey P. Dale_, Apr 27 2018 *) %Y A048318 Cf. A037013, A043696, A043710, A044818, A044956. %K A048318 nonn,base %O A048318 0,3 %A A048318 _Patrick De Geest_, Feb 15 1999