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 A141791 #9 Jan 15 2020 18:30:46 %S A141791 3,5,5,5,7,7,7,11,13,13,13,17,17,17,17,17,19,19,19,19,19,23,23,23,29, %T A141791 31,31,31,31,31,31,31,31,31,31,31,31,31,37,37,37,37,37,41,41,41,41,41, %U A141791 43,43,43,43,43,43,43,43,43,47,47,47,47,47,47,47,47,47,47,47,53,59,59,59,59,59 %N A141791 Primes of the form c(n)-n, where c(n)=n-th composite. %C A141791 c(n)=A002808(n). %C A141791 Entries may be repeated and are shown in order of increasing generator n. %H A141791 Harvey P. Dale, <a href="/A141791/b141791.txt">Table of n, a(n) for n = 1..1000</a> %e A141791 n=1: c(1)-1=4-1=3=a(1). %e A141791 n=3: c(3)-3=8-3=5=a(2). %e A141791 n=4: c(4)-4=9-4=5=a(3). %e A141791 n=5: c(5)-5=10-5=5=a(4). %e A141791 n=7: c(7)-7=14-7=7=a(5). %t A141791 Module[{cmps=Select[Range[300],CompositeQ]},Select[#[[1]]-#[[2]]&/@ Thread[ {cmps,Range[Length[cmps]]}],PrimeQ]] (* _Harvey P. Dale_, Jan 15 2020 *) %Y A141791 Cf. A000040, A051697, A002808. %K A141791 nonn %O A141791 1,1 %A A141791 _Juri-Stepan Gerasimov_, Sep 13 2008, Feb 15 2009 %E A141791 Corrected and extended by _R. J. Mathar_, Sep 26 2008