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 A168563 #15 May 20 2021 12:44:53 %S A168563 1,1,3,4,7,7,9,14,15,19,21,22,25,29,34,35,40,43,43,47,50,55,62,65,65, %T A168563 68,69,71,83,86,91,91,100,101,106,111,113,118,123,124,133,133,135,136, %U A168563 147,158,161,161,164,169,169,177,182,187,192,193,197,200,201,209,222,225,226 %N A168563 a(n) = (n-th prime > 3) minus (n-th composite number). %H A168563 Harvey P. Dale, <a href="/A168563/b168563.txt">Table of n, a(n) for n = 1..1000</a> %F A168563 a(n) = prime(n+2)-composite(n) = A161671(n+2). %t A168563 Module[{nn=100,pr,cmp},cmp=Select[Range[nn],CompositeQ];pr=Prime[ Range[ 3, Length[cmp]+2]];pr-cmp] (* _Harvey P. Dale_, May 28 2015 *) %Y A168563 Cf. A161671. %K A168563 nonn,easy %O A168563 1,3 %A A168563 _Juri-Stepan Gerasimov_, Nov 29 2009 %E A168563 Edited by _Charles R Greathouse IV_, Mar 25 2010