%I A067185
%S A067185 7,17,109,281,1669,6592663,16899113,16899145,16899295,749973611
%N A067185 Numbers n such that prime(n+1)+prime(n)==1 (mod n).
%t A067185 a = b = 0; Do[b = Prime[n + 1]; If[Mod[a + b, n] == 1, Print[n]]; a = 
               b, {n, 1, 10^9}]
%Y A067185 Sequence in context: A082738 A092340 A068172 this_sequence A063384 A165246 
               A118108
%Y A067185 Adjacent sequences: A067182 A067183 A067184 this_sequence A067186 A067187 
               A067188
%K A067185 nonn
%O A067185 1,1
%A A067185 Benoit Cloitre (benoit7848c(AT)orange.fr), Feb 19 2002
%E A067185 Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 19 
               2002
%E A067185 Extended by David W. Wilson (davidwwilson(AT)comcast.net), Feb 20 2002