A187973 Positions of 0 in A187972; complement of A187974.

3, 5, 8, 10, 15, 17, 20, 22, 27, 29, 32, 34, 37, 39, 44, 46, 49, 51, 56, 58, 61, 63, 66, 68, 73, 75, 78, 80, 85, 87, 90, 92, 97, 99, 102, 104, 107, 109, 114, 116, 119, 121, 126, 128, 131, 133, 136, 138, 143, 145, 148, 150, 155, 157, 160, 162, 167, 169, 172, 174, 177, 179, 184, 186, 189, 191, 196, 198, 201, 203, 206, 208, 213, 215, 218, 220

Offset

1,1

Comments

See A187950.

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Mathematica

r=2^(1/2);
seqA=Table[Floor[(n+4)r]-Floor[n*r]-Floor[4r], {n, 1, 220}]   (* A187972 *)
Flatten[Position[seqA, 0] ]   (* A187973 *)
Flatten[Position[seqA, 1] ]   (* A187974 *)

Crossrefs

Cf.A187950, A187972, A187974.

Sequence in context: A162383 A123327 A024679 * A190488 A182082 A117467

Adjacent sequences: A187970 A187971 A187972 * A187974 A187975 A187976

Keyword

nonn

Author

Clark Kimberling, Mar 17 2011

Status

approved