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.
?(SequenceCount[IntegerDigits[n],IntegerDigits[#]]>0&)]; DeleteDuplicates[Table[{n,dcdr[n]},{n,1313*10^5}],GreaterEqual[#1[[2]],#2[[2]]]&][[;;,1]] (* _Harvey P. Dale has authored 0 sequences.