A144411 - OEIS

A144411

Odd nonprime gaps adjusted to be {2,1,0,-1}: a(n)=A067970(n)/2-2.

2, 1, 1, 0, -1, 1, -1, 0, 1, 0, -1, 0, -1, 1, -1, 0, 1, -1, 0, 0, -1, 0, -1, -1, 0, 1, 1, 0, -1, -1, -1, -1, -1, 0, 0, -1, 1, -1, -1, -1, 1, -1, 0, -1, 0, 0, -1, 0, -1, 1, -1, -1, -1, 1, 1, -1, -1, -1, -1, 0, -1, -1, -1, -1, 0, 1, 0, -1, 1, -1, -1, -1, 0, -1, 0, -1, 0, -1, 1, -1, 0, 1, -1, -1, -1, 0, -1, -1, -1, -1, -1, 0, 1, 0, -1, -1, -1, -1, -1, 0

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

FORMULA

a(n)=A067970(n)/2-2.

MATHEMATICA

b = Flatten[Table[If[PrimeQ[2*n + 1], {}, 2*n + 1], {n, 0, 200}]]; c = Table[(b[[n + 1]] - b[[n]])/2 - 2, {n, 1, Length[b] - 1}]

CROSSREFS

Sequence in context: A142598 A274372 A037800 * A138253 A341969 A261447

Adjacent sequences: A144408 A144409 A144410 * A144412 A144413 A144414

KEYWORD

uned,sign

AUTHOR

Roger L. Bagula and Gary W. Adamson, Sep 30 2008

STATUS

approved