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 A067073 #13 Dec 02 2023 20:14:14
%S A067073 3,7,13,17,19,31,37,41,43,47,53,71,79,89,103,127,131,137,151
%N A067073 Records in A092419.
%C A067073 The old entry with this sequence number was a duplicate of A049236.
%p A067073 A000037 := proc(n) n +floor(1/2+sqrt(n)) ; end: A092419 :=proc(n) local i, k; k := A000037(n) ; for i from 1 do if numtheory[legendre](k, ithprime(i)) = -1 then RETURN(ithprime(i)); fi; od; end: rec := -1 ; for n from 1 do a := A092419(n) ; if a > rec then printf("%d,\n",a) ; rec := a; fi; od: # _R. J. Mathar_, Jul 13 2009
%Y A067073 Cf. A092419, A070040.
%K A067073 nonn,more
%O A067073 1,1
%A A067073 _N. J. A. Sloane_, Oct 16 2008
%E A067073 a(8)-a(12) from _R. J. Mathar_, Jul 13 2009
%E A067073 a(13)-a(19) from _Sean A. Irvine_, Dec 02 2023