This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A155189 Square-weak primes. 0
 3, 5, 7, 13, 19, 23, 31, 43, 47, 53, 61, 73, 83, 89, 103, 109, 113, 131, 139, 151, 157, 167, 173, 181, 193, 199, 211, 229, 233, 241, 257, 263, 271, 283, 293, 313, 317, 337, 349, 353, 359, 373, 383, 389, 401, 409, 421, 433, 443, 449, 463, 467, 491, 503, 509, 523 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS 5^2 = 25 < 29 = (3^2+7^2)/2, ... LINKS MATHEMATICA lst={}; Do[p0=Prime[n]; p1=Prime[n+1]; p2=Prime[n+2]; If[p1^2<(p0^2+p2^2)/2, AppendTo[lst, p1]], {n, 5!}]; lst CROSSREFS Cf. A045536, A005384, A051634, A006562, A051635, A155188 Sequence in context: A059788 A077171 A171602 * A065384 A126108 A100859 Adjacent sequences:  A155186 A155187 A155188 * A155190 A155191 A155192 KEYWORD nonn AUTHOR Vladimir Joseph Stephan Orlovsky, Jan 21 2009 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 15 20:11 EDT 2019. Contains 327086 sequences. (Running on oeis4.)