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 A091816 #17 Aug 29 2024 00:55:44
%S A091816 1,2,3,4,8,14,15,17,19,21,22,27,28,31,55,59,80,108,114,126,199,225,
%T A091816 248,316,352,406,467,601,875,1016,1040,1056,1095,1245,1252,1418,1468,
%U A091816 1471,1496,1627,1724,1728,1873,1892,2015,2039,2684,2971,3043,3165,3226,3368,3429
%N A091816 Numbers m such that the numerator of Sum_{i=1..m} (i+1)/i is prime.
%H A091816 Michael S. Branicky, <a href="/A091816/b091816.txt">Table of n, a(n) for n = 1..101</a>
%p A091816 f:= proc(n) option remember; `if`(n<1, 0, f(n-1)+(n+1)/n) end:
%p A091816 q:= n-> isprime(numer(f(n))):
%p A091816 select(q, [$1..2000])[]; # _Alois P. Heinz_, Aug 27 2024
%o A091816 (PARI) ss(n)=sum(i=1,n,(i+1)/i); for (i=1,1000,if(isprime(numerator(ss(i))),print1(i,",")))
%Y A091816 Cf. A091815, A166939.
%K A091816 nonn
%O A091816 1,2
%A A091816 Mohammed Bouayoun (bouyao(AT)wanadoo.fr), Mar 07 2004
%E A091816 a(30) and beyond from _Michael S. Branicky_, Aug 26 2024