login
A188075
Positions of 0 in the zero-one sequence [nr]-[4r]-[nr-4r], where r=sqrt(3), n>=1.
1
4, 15, 30, 45, 56, 71, 86, 101, 112, 127, 142, 157, 168, 183, 198, 209, 224, 239, 254, 265, 280, 295, 310, 321, 336, 351, 366, 377, 392, 407, 418, 433, 448, 463, 474, 489, 504, 519, 530, 545, 560, 575, 586, 601, 616, 627, 642, 657, 672, 683, 698, 713, 728, 739, 754, 769, 780, 795, 810, 825, 836, 851, 866, 881, 892, 907, 922, 937, 948, 963, 978, 989
OFFSET
1,1
COMMENTS
See A188014.
MATHEMATICA
r=3^(1/2)); k=4;
t=Table[Floor[n*r]-Floor[(n-k)*r]-Floor[k*r], {n, 1, 220}] Flatten[Position[t, 0]] (*A188075*)
Flatten[Position[t, 1]] (* complement of A188075 *)
CROSSREFS
Sequence in context: A337519 A031012 A349428 * A322740 A366659 A121914
KEYWORD
nonn
AUTHOR
Clark Kimberling, Mar 20 2011
STATUS
approved