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 A078862 #6 Oct 15 2013 22:31:47
%S A078862 1901,433,647,23,31,3607,251,47,53,61,1117,73,83,727,941,733,947,331,
%T A078862 131,557,353,151,157,373,167,173,601,607,3761,1033
%N A078862 Smallest primes from A031924, each belonging to those different residue class of mod 210 which are listed in A078861. Arranged according to possible least positive residues mod 210.
%e A078862 Several terms are equal to corresponding ones in A078861, while others are larger like: 1033=4.210+193, where r=193 is in A078861.
%t A078862 f[x_] := Mod[Prime[x], 210] d[x_] := Prime[x+1]-Prime[x] t=Table[0, {210}]; Do[s=f[n]; If[Equal[d[n], 6]&&s<211&&t[[s]]==0, t[[s]]=Prime[n]], {n, 1, 1000}]; t
%Y A078862 Cf. A031924, A008364, A078861, A078859-A078864.
%K A078862 fini,full,nonn
%O A078862 1,1
%A A078862 _Labos Elemer_, Dec 13 2002