%I A024901
%S A024901 1,3,7,9,13,15,19,25,33,37,39,45,55,57,63,67,73,75,85,87,97,99,103,105,
               109,
%T A024901 123,127,133,139,145,153,157,165,169,175,177,183,187,189,205,207,213,219,
%U A024901 223,229,237,243,249,255,259,267,279,283,285,295,309,315,325,327,337,339
%N A024901 Numbers n such that 7*n-2 is prime.
%t A024901 lst={};Do[p=7*n-2;If[PrimeQ[p], AppendTo[lst, n]], {n, 10^2}];lst [From 
               Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 10 2008]
%Y A024901 a(n) = A089079(n)-3.
%Y A024901 Sequence in context: A111225 A032678 A073671 this_sequence A000959 A120226 
               A137310
%Y A024901 Adjacent sequences: A024898 A024899 A024900 this_sequence A024902 A024903 
               A024904
%K A024901 nonn
%O A024901 1,2
%A A024901 Clark Kimberling (ck6(AT)evansville.edu)