A176032 Absolute values of A106044-A056892.

1, 1, 3, 1, 3, 1, 7, 3, 5, 3, 1, 11, 3, 1, 9, 7, 5, 9, 11, 3, 1, 13, 15, 3, 13, 19, 15, 7, 3, 5, 11, 3, 9, 13, 15, 11, 1, 13, 21, 19, 7, 3, 17, 21, 27, 23, 1, 25, 27, 23, 15, 3, 1, 21, 31, 19, 7, 3, 9, 17, 21, 27, 1, 9, 13, 21, 23, 11, 9, 13, 21, 33, 27, 15, 3, 5, 17, 33, 39, 23, 3, 1, 21, 25

Offset

1,3

Comments

A106044 2,1,4,2,5,3,8,6,2,7,5,12,8,6,2,11,.. A056892 1,2,1,3,2,4,1,3,7,4,6,1,5,7,11,4,10,.. 2-1=1,2-1=1,4-1=3,3-2=1,5-2=3,...

Links

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

Mathematica

f[n_]:=Floor[Sqrt[n]]; lst={}; Do[p=Prime[n]; AppendTo[lst, Abs[((f[p]+1)^2-p)-(p-f[p]^2)]], {n, 3*5!}]; lst

Crossrefs

Cf. A056892, A106044

Sequence in context: A095250 A135521 A344763 * A218403 A318506 A322382

Adjacent sequences: A176029 A176030 A176031 * A176033 A176034 A176035

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Apr 06 2010

Status

approved