login
A190703
Positions of 4 in A190698.
6
4, 8, 15, 19, 23, 30, 34, 38, 45, 49, 56, 60, 64, 71, 75, 79, 86, 90, 101, 105, 112, 116, 120, 127, 131, 135, 142, 146, 157, 161, 168, 172, 176, 183, 187, 191, 198, 202, 209, 213, 217, 224, 228, 232, 239, 243, 254, 258, 265, 269, 273, 280, 284, 288, 295, 299, 310, 314, 321, 325, 329, 336, 340, 344, 351, 355, 366, 370, 377, 381, 385
OFFSET
1,1
COMMENTS
See A190698.
LINKS
MATHEMATICA
r = Sqrt[3]; b = 4; c = 1;
f[n_] := Floor[(b*n + c)*r] - b*Floor[n*r] - Floor[c*r];
t = Table[f[n], {n, 1, 200}] (* A190698 *)
Flatten[Position[t, 0]] (* A190699 *)
Flatten[Position[t, 1]] (* A190700 *)
Flatten[Position[t, 2]] (* A190701 *)
Flatten[Position[t, 3]] (* A190702 *)
Flatten[Position[t, 4]] (* A190703 *)
CROSSREFS
Cf. A190698.
Sequence in context: A312735 A312736 A188088 * A312737 A312738 A312739
KEYWORD
nonn
AUTHOR
Clark Kimberling, May 17 2011
STATUS
approved