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 A078860 #4 Oct 15 2013 22:31:46
%S A078860 7,13,19,37,43,67,79,97,103,109,127,139,163,169,187,193
%N A078860 Least positive residues [mod 210] representing those residue classes which can be lesser of prime pairs from A029710.
%F A078860 Intersection[RRS(210), 4+RRS{210)]-4 and {7}. RRS[210]=reduced residue system of 210=first 48=phi[210] terms of A008364; additional term 7 is a singular cases; 210k+r generates complete A029710 with suitable k and r taken from these 15+1 numbers.
%t A078860 t=Flatten[Position[Table[GCD[w, 210], {w, 1, 210}], 1]] t2=Intersection[t, t+4]-4
%Y A078860 Cf. A029710, A008364, A078859.
%K A078860 fini,full,nonn
%O A078860 1,1
%A A078860 _Labos Elemer_, Dec 13 2002