Search: id:A133261 Results 1-1 of 1 results found. %I A133261 %S A133261 3,7,13,19,23,31,37,43,47,53,61,67,73,83,89,97,103,109,113,131,139,151, %T A133261 157,167,173,181,193,199,211,223,229,233,241,251,257,263,271,277,283, %U A133261 293,307,313,317,337,349,353,359,367,373,383,389,401,409,421,433,443 %N A133261 Union of A134196 and A134197 : A126990 with duplicates removed. %t A133261 << NumberTheory`NumberTheoryFunctions` a = {}; Do[AppendTo[a, PreviousPrime[Sqrt[(Prime[ x - 1])*(Prime[x + 1])]]], {x, 2, 300}]; Union[a] %Y A133261 Cf. A134196, A134197, A126990. %Y A133261 Sequence in context: A038978 A133387 A105399 this_sequence A113911 A051635 A136009 %Y A133261 Adjacent sequences: A133258 A133259 A133260 this_sequence A133262 A133263 A133264 %K A133261 nonn %O A133261 1,1 %A A133261 Artur Jasinski (grafix(AT)csl.pl), Oct 15 2007 Search completed in 0.001 seconds