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 A107770 #33 Apr 23 2023 21:25:12
%S A107770 3,4,6,8,11,14,18,21,27,29,34,36,42,44,46,50,53,58,61,65,70,82,84,90,
%T A107770 99,105,110,114,117,121,141,143,145,149,153,172,174,177,179,183,191,
%U A107770 202,207,210,213,216,226,231,235,237,254,257,263,266,269,278,287
%N A107770 Index of greater of twin primes in the primes.
%C A107770 Numbers k such that prime(k) - prime(k-1) = 2.
%C A107770 Numbers k such that A062301(k) is 1. - _Vincenzo Librandi_, Apr 04 2018
%H A107770 Harvey P. Dale, <a href="/A107770/b107770.txt">Table of n, a(n) for n = 1..1000</a>
%F A107770 a(n) = A029707(n) + 1. - _Juri-Stepan Gerasimov_, Dec 16 2009
%F A107770 a(n) = A000720(A006512(n)).
%p A107770 select(n->ithprime(n)-ithprime(n-1)=2, [$2..300]); # _Muniru A Asiru_, Apr 05 2018
%t A107770 a = Flatten[Table[If[Prime[j] - Prime[j - 1] == 2, j, {}], {j, 2, 200}]]
%t A107770 Flatten[Position[Partition[Prime[Range[400]],2,1],_?(#[[2]]-#[[1]] == 2&),{1},Heads->False]]+1 (* _Harvey P. Dale_, Jun 10 2014 *)
%o A107770 (Magma) [n: n in [1..450]| IsPrime(NthPrime(n)-2)]; // _Vincenzo Librandi_, Apr 04 2018
%o A107770 (PARI) for(n=3, 1e3, if(isprime(prime(n)-2), print1(n, ", "))); \\ _Altug Alkan_, Apr 05 2018
%Y A107770 Cf. A062301.
%K A107770 nonn,easy
%O A107770 1,1
%A A107770 _Roger L. Bagula_, Jun 11 2005
%E A107770 Incorrect comment removed by _Charles R Greathouse IV_, Mar 19 2010
%E A107770 More terms from _Harvey P. Dale_, Jun 10 2014