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 A334372 #10 Apr 25 2020 21:38:42
%S A334372 21481224,22314620,25502420,25502421,32432425,130062260,147026913,
%T A334372 713021425,922216713,938710112,1012101135,1019292153,1113068913,
%U A334372 1420791155,1545743565,1671500190,1805406154,1941702882,2010317425,2027025025,2200277555,2307662313,2437253313
%N A334372 Starts of runs of 4 consecutive Moran numbers (A001101).
%H A334372 Amiram Eldar, <a href="/A334372/b334372.txt">Table of n, a(n) for n = 1..197</a> (terms below 10^11)
%e A334372 21481224 is a term since 21481224/(2+1+4+8+1+2+2+4) = 895051, 21481225/(2+1+4+8+1+2+2+5) = 859249, 21481226/(2+1+4+8+1+2+2+6) = 826201 and 21481227/(2+1+4+8+1+2+2+7) = 795601 are all primes.
%t A334372 moranQ[n_] := PrimeQ[n / Plus @@ IntegerDigits[n]]; m = moranQ /@ Range[4]; seq = {}; Do[If[And @@ m, AppendTo[seq, k - 4]]; m = Join[Rest[m], {moranQ[k]}], {k, 5, 3 * 10^7}]; seq
%Y A334372 Subsequence of A001101, A085775, A141769 and A334371.
%Y A334372 Cf. A235397.
%K A334372 nonn,base
%O A334372 1,1
%A A334372 _Amiram Eldar_, Apr 25 2020