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 A175080 #4 Mar 10 2013 08:35:59
%S A175080 2,2999,3299,5147,5981,8999,9587,10037,10427,10559,10937,11579,12889,
%T A175080 13367,14143,14591,14621,15859,16301,16871,18041,18839,18947,19661,
%U A175080 21059,21557,22229,22343,22853,23399,23957,24317,24659,25523,27179
%N A175080 Primes q (except greater of twin primes) with result 2 under iterations of {r mod (max prime p < r)} starting at r = q.
%C A175080 Subsequence of A175075. Union of a(n) and sequence A006512 (greater of twin primes) is A175075.
%H A175080 Harvey P. Dale, <a href="/A175080/b175080.txt">Table of n, a(n) for n = 1..1000</a>
%e A175080 Iteration procedure for a(2) = 2999: 2999 mod 2971 = 28, 28 mod 23 = 5, 5 mod 3 = 2.
%t A175080 mpQ[n_]:=!PrimeQ[n-2]&&MemberQ[NestWhileList[Mod[#,NextPrime[#,-1]]&,n,#>0&],2]; Select[Prime[Range[3000]],mpQ] (* _Harvey P. Dale_, Mar 10 2013 *)
%K A175080 nonn
%O A175080 1,1
%A A175080 _Jaroslav Krizek_, Jan 23 2010