%I A118612
%S A118612 2,5,29,44560482149,13558774610046711780701
%N A118612 Denominator if the numerator and denominator of the continued fraction 
               rational approximation of sqrt(2) are both prime.
%C A118612 Next term, if it exists, is bigger than 489 digits (the 1279th convergent 
               to sqrt(2)).
%t A118612 For[n = 2, n < 1500, n++, a := Join[{1}, Table[2, {i, 2, n}]]; If[PrimeQ[Denominator[FromContinuedFraction[a]\
               ]], If[PrimeQ[Numerator[FromContinuedFraction[a]]], Print[Denominator[FromContinuedFraction[a]]]]]] 
               - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), May 09 
               2006
%Y A118612 A086397 has the numerators. This sequence is a subsequence of A000129, 
               A086383 and A101411.
%Y A118612 Sequence in context: A121910 A073833 A086383 this_sequence A158866 A101078 
               A109739
%Y A118612 Adjacent sequences: A118609 A118610 A118611 this_sequence A118613 A118614 
               A118615
%K A118612 frac,nonn
%O A118612 1,1
%A A118612 Joshua Zucker (joshua.zucker(AT)stanfordalumni.org), May 08 2006