A184521 - OEIS

%I #8 May 31 2012 13:43:01

%S 7,13,19,25,31,37,44,50,56,62,68,75,81,87,93,99,106,112,118,124,130,

%T 137,143,149,155,161,168,174,180,186,192,199,205,211,217,223,229,236,

%U 242,248,254,260,267,273,279,285,291,298,304,310,316,322,329,335,341,347,353,360,366,372,378,384,390,397,403,409,415,421,428,434,440,446,452,459,465,471,477

%N Upper s-Wythoff sequence, where s=5n+1.  Complement of A184520.

%C See A184117 for the definition of lower and upper s-Wythoff sequences.

%C The terms 7,13,19,25,31,37,44,50 appear as the initial values of the n-weight domination number gamma_n(P_3 X P_8) in Hare (1990). This may or may not be a coincidence. - _N. J. A. Sloane_, May 31 2012

%D Hare, E. O., k-weight domination and fractional domination of P_m X P_n. Proceedings of the Twenty-first Southeastern Conference on Combinatorics, Graph Theory, and Computing (Boca Raton, FL, 1990). Congr. Numer. 78 (1990), 71--80. MR1140471 (92i:05201). - From _N. J. A. Sloane_, May 31 2012

%t k = 5; r = -1; d = Sqrt[4 + k^2];

%t a[n_] := Floor[(1/2) (d + 2 - k) (n + r/(d + 2))];

%t b[n_] := Floor[(1/2) (d + 2 + k) (n - r/(d + 2))];

%t Table[a[n], {n, 120}]

%t Table[b[n], {n, 120}]

%Y Cf. A184117, A184520.

%K nonn

%O 1,1

%A _Clark Kimberling_, Jan 16 2011