id:A139811 - OEIS Search Results

Search: id:A139811

Displaying 1-1 of 1 results found.

page 1

Primes Prime[n] such that Prime[n]^2 - Prime[n + 2]*Prime[n - 2] < 0.

+0
1

19, 43, 47, 61, 73, 79, 83, 89, 109, 113, 137, 139, 157, 167, 181, 197, 199, 211, 229, 233, 239, 241, 271, 281, 283, 293, 313, 317, 353, 359, 383, 389, 401, 439, 443, 449, 463, 467, 503, 509, 521, 523 (list; graph; listen)

	OFFSET	`1,1`
	MATHEMATICA	`Flatten[Table[If[Prime[n]^2 - Prime[n + 2]*Prime[n - 2] < 0, Prime[n], {}], {n, 3, 100}]]`
	CROSSREFS	`Cf. A130903.` `Adjacent sequences: A139808 A139809 A139810 this_sequence A139812 A139813 A139814` `Sequence in context: A139580 A094841 A001986 this_sequence A095101 A095086 A095079`
	KEYWORD	`nonn`
	AUTHOR	`Roger Bagula and Gary W. Adamsom (rlbagulatftn(AT)yahoo.com), May 23 2008`
	EXTENSIONS	`Edited by njas, May 23 2008`

page 1

Search completed in 0.002 seconds

Last modified October 6 16:13 EDT 2008. Contains 144667 sequences.

AT&T Labs Research