cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

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

This page as a plain text file.
%I A144411 #5 Jul 16 2015 21:46:59
%S A144411 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,
%T A144411 -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,
%U A144411 -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
%N A144411 Odd nonprime gaps adjusted to be {2,1,0,-1}: a(n)=A067970(n)/2-2.
%F A144411 a(n)=A067970(n)/2-2.
%t A144411 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}]
%K A144411 uned,sign
%O A144411 1,1
%A A144411 _Roger L. Bagula_ and _Gary W. Adamson_, Sep 30 2008