A176180 Primes p such that gcd(p(n)-1, p(n+1)-1) != gcd(p(n)+1, p(n+1)+1).

7, 13, 19, 23, 31, 37, 43, 47, 53, 61, 67, 73, 79, 83, 89, 97, 103, 109, 113, 127, 131, 139, 151, 157, 163, 167, 173, 181, 193, 199, 211, 223, 229, 233, 241, 251, 257, 263, 271, 277, 293, 307, 313, 331, 349, 353, 359, 367, 373, 379, 383, 389, 397, 401, 409, 421

Offset

1,1

Links

Table of n, a(n) for n=1..56.

Mathematica

lst={}; Do[p0=Prime[n]; p1=Prime[n+1]; If[GCD[p0-1, p1-1]!=GCD[p0+1, p1+1], AppendTo[lst, p0]], {n, 6!}]; lst

Crossrefs

Cf. A063091

Sequence in context: A033561 A227030 A049591 * A209623 A058620 A038910

Adjacent sequences: A176177 A176178 A176179 * A176181 A176182 A176183

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Apr 11 2010

Status

approved