A190889 Positions of 2 in A190886.

2, 6, 11, 15, 19, 23, 32, 36, 40, 49, 53, 57, 61, 66, 70, 74, 78, 83, 87, 91, 95, 104, 108, 112, 121, 125, 129, 138, 142, 146, 150, 155, 159, 163, 167, 176, 180, 184, 193, 197, 201, 210, 214, 218, 222, 227, 231, 235, 239, 248, 252, 256, 265, 269, 273, 282, 286, 290, 294, 299, 303, 307, 311, 316, 320, 324, 328, 337, 341, 345, 354, 358

Offset

1,1

Comments

See A190886.

Links

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

Mathematica

r = Sqrt[5];
f[n_] := Floor[5n*r] - 5*Floor[n*r]
t = Table[f[n], {n, 1, 400}] (* A190886 *)
Flatten[Position[t, 2]]      (* A190889 *)

Crossrefs

Cf. A190886.

Sequence in context: A377287 A035487 A299637 * A020966 A193910 A215918

Adjacent sequences: A190886 A190887 A190888 * A190890 A190891 A190892

Keyword

nonn

Author

Clark Kimberling, May 26 2011

Status

approved