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 A291546 #18 Aug 30 2017 15:01:49
%S A291546 1,3,7,13,23,31,43,59,73,97,127,149,167,193,227,263,283,311,349,389,
%T A291546 421,463,509,557,601,653,709,769,823,881,947,997,1061,1123,1193,1277,
%U A291546 1367,1439,1531,1607,1693,1787,1861,1949,2017,2099,2179,2281,2377,2477
%N A291546 a(n) = Sum_{k=1..n} A073659(k).
%C A291546 For n > 1, a(n) is a prime.
%H A291546 Seiichi Manyama, <a href="/A291546/b291546.txt">Table of n, a(n) for n = 1..1000</a>
%t A291546 a = {1}; Do[k = 2; While[Or[! PrimeQ[Total@ a + k], MemberQ[a, k]], k += 2]; AppendTo[a, k], {49}]; Accumulate@ a (* _Michael De Vlieger_, Aug 26 2017, after _Jayanta Basu_ at A073659 *)
%o A291546 (PARI) v=[1]; n=1; vp=[1]; while(n<200, if(isprime(p=n+vecsum(v)) && !vecsearch(vecsort(v), n), v=concat(v, n); vp = concat(vp, p); n=0); n++); vp \\ _Michel Marcus_, Aug 26 2017
%Y A291546 Cf. A000040, A008578, A073659. Apart from the first term the same as A291544.
%K A291546 nonn
%O A291546 1,2
%A A291546 _Seiichi Manyama_, Aug 26 2017