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 A122171 #7 Aug 12 2015 02:02:57 %S A122171 1,4,6,10,12,18,38,74,40,24,68,30,36,54,72,100,134,78,60,66,102,96,84, %T A122171 114,238,90,132,266,126,220,368,174,156,120,150,380,204,180,222,258, %U A122171 288,276,682,234,530,264,324,252,306,240,490,210,372,270,402,728,408,650 %N A122171 Smallest number m such that there are exactly n primes of form m+p for primes p<2m. %C A122171 First occurrence of n in A122170. %e A122171 a(4)=10 because it is the first followed by 14,16,... such that exactly 4 primes p respectively below 2*10,2*14,2*16,... form 4 other primes respectively of form p+10,p+14,p+16,...[For m=10, the 4 primes below 20 are 3,7,13,19 ; For m=14, the 4 primes below 28 are 3,5,17,23 ; For m=16, the 4 primes below 32 are 3,7,13,31 ; ...] %p A122171 A122171 := proc(n) local m,p,pgood; m := 0 ; while true do p := 2 ; pgood := 0 ; while p <= 2*m do if isprime(m+p) then pgood := pgood+1 ; fi ; p := nextprime(p) ; od ; if pgood = n then RETURN(m) ; fi ; m := m+1 ; od ; end: for n from 1 to 80 do printf("%d, ",A122171(n)) ; od : # _R. J. Mathar_, Dec 16 2006 %K A122171 nonn %O A122171 1,2 %A A122171 _Lekraj Beedassy_, Aug 23 2006 %E A122171 More terms from _R. J. Mathar_, Dec 16 2006