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 A085775 #11 Apr 25 2020 08:41:39 %S A085775 152,803,1016,1853,3031,3032,3438,7361,7542,7587,8226,8337,10095, %T A085775 10278,10307,11354,11646,13116,13117,13881,17153,21434,21906,23412, %U A085775 26221,28824,30254,31112,32166,34218,35513,38322,40335,41058,44373,45380 %N A085775 Numbers k such that (k / sum of digits of k) and (k+1 / sum of digits of k+1) are both prime. %H A085775 Amiram Eldar, <a href="/A085775/b085775.txt">Table of n, a(n) for n = 1..10000</a> %e A085775 152 is a term since 152/(1+5+2) = 19 and 153/(1+5+3) = 17 are both prime. %t A085775 moranQ[n_] := PrimeQ[n / Plus @@ IntegerDigits[n]]; Select[Range[50000], moranQ[#] && moranQ[#+1] &] (* _Amiram Eldar_, Apr 25 2020 *) %Y A085775 Subsequence of A001101 and A330927. %K A085775 base,nonn %O A085775 1,1 %A A085775 _Jason Earls_, Jul 23 2003 %E A085775 Offset corrected by _Amiram Eldar_, Apr 25 2020