%I A078864
%S A078864 3,5,11,17,29,41,59,71,101,107,137,149,179,191,197,419,1427
%N A078864 Smallest primes from A001359, each belonging to those different residue 
               class of mod 210 which are listed in A078859. Arranged according 
               to possible least positive residues mod 210.
%e A078864 Several terms are equal to corresponding ones in A078859, while others 
               are larger like: 1427=210.6+167 where r=167 is in A078859.
%t A078864 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], 2]&&s<211&&t[[s]]==0, t[[s]]=Prime[n]], 
               {n, 1, 10000}]; t
%Y A078864 Cf. A001359, A008364, A078859-A078864.
%Y A078864 Sequence in context: A054799 A001359 A096292 this_sequence A023218 A073022 
               A129694
%Y A078864 Adjacent sequences: A078861 A078862 A078863 this_sequence A078865 A078866 
               A078867
%K A078864 fini,full,nonn
%O A078864 1,1
%A A078864 Labos E. (labos(AT)ana.sote.hu), Dec 13 2002