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 A181100 #8 Feb 18 2019 04:57:00 %S A181100 1,2,3,5,8,10,17,20,21,28,29,37,42,48,49,51,59,65,73,76,81,84,91,92, %T A181100 100,112,113,114,118,122,125,128,132,147,160,163,169,170,173,175,182, %U A181100 188,197,220,221,222,228,233,236,242,253,265,270,278,282,283,286,293,297 %N A181100 Numbers k such that A028260(k) + 1 is prime. %H A181100 Nathaniel Johnston, <a href="/A181100/b181100.txt">Table of n, a(n) for n = 1..10000</a> %p A181100 A181100 := proc(n) option remember: local k: if(n=1)then return 1: fi: for k from procname(n-1)+1 do if(isprime(A028260(k)+1))then return k: fi: od: end: seq(A181100(n),n=1..59); # _Nathaniel Johnston_, May 27 2011 %K A181100 easy,nonn %O A181100 1,2 %A A181100 _Giovanni Teofilatto_, Oct 03 2010 %E A181100 Essentially all entries corrected by _R. J. Mathar_, Oct 12 2010