cp's OEIS Frontend

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.

A334373 Starts of runs of 5 consecutive Moran numbers (A001101).

This page as a plain text file.
%I A334373 #9 Apr 27 2020 11:27:44
%S A334373 25502420,5301223225,13242121221,32005512020,74761736450,213415171233,
%T A334373 221221400424,232212103220,243857053493,685392911334,732258727252,
%U A334373 889011113804,905191111482,1013460525033,1080719141080,1229198438214,1461057000513,1961972092132,2157993351414
%N A334373 Starts of runs of 5 consecutive Moran numbers (A001101).
%H A334373 Giovanni Resta, <a href="/A334373/b334373.txt">Table of n, a(n) for n = 1..230</a> (terms < 10^14)
%e A334373 25502420 is a term since 25502420, 25502421, 25502422, 25502423 and 25502424 are all Moran numbers.
%t A334373 moranQ[n_] := PrimeQ[n / Plus @@ IntegerDigits[n]]; m = moranQ /@ Range[5]; seq = {}; Do[If[And @@ m, AppendTo[seq, k - 5]]; m = Join[Rest[m], {moranQ[k]}], {k, 6, 10^8}]; seq
%Y A334373 Subsequence of A001101, A085775, A330928, A334371 and A334372.
%Y A334373 Cf. A235397.
%K A334373 nonn,base
%O A334373 1,1
%A A334373 _Amiram Eldar_, Apr 25 2020
%E A334373 Terms a(6) and beyond from _Giovanni Resta_, Apr 27 2020