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 A190727 #22 Oct 06 2021 12:35:34
%S A190727 0,1,2,3,4,5,6,7,8,0,2,4,6,8,10,12,14,16,18,1,4,7,10,13,16,19,22,25,
%T A190727 28,2,6,10,14,18,22,26,30,34,38,3,8,13,18,23,28,33,38,43,48,4,10,16,
%U A190727 22,28,34,40,46,52,58,5,12,19,26,33,40,47,54,61,68,6,14,22,30,38,46,54,62
%N A190727 Product of (digits of n each incremented by 1) - 2.
%C A190727 Number of numbers in range 1 to n-1 whose decimal expansion is, term-by-term, dominated by n.
%e A190727 a(23) = 10 since all the numbers 22, 21, 20, 13, 12, 11, 10, 3, 2, 1 count.
%t A190727 f[n_]:=Module[{idnp=IntegerDigits[n]+1},Times@@idnp-2]; Array[f,80](* _Harvey P. Dale_, May 24 2011 *)
%o A190727 (PARI) a(n) = vecprod(apply(x->x+1, digits(n))) - 2; \\ _Michel Marcus_, Oct 06 2021
%Y A190727 Equals A089898(n)-2.
%K A190727 nonn,base
%O A190727 1,3
%A A190727 _N. J. A. Sloane_, May 17 2011