cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A184523 Upper s-Wythoff sequence, where s=5n. Complement of A184522.

This page as a plain text file.
%I A184523 #10 Oct 16 2024 09:24:47
%S A184523 6,12,18,24,30,37,43,49,55,61,68,74,80,86,92,99,105,111,117,123,130,
%T A184523 136,142,148,154,161,167,173,179,185,191,198,204,210,216,222,229,235,
%U A184523 241,247,253,260,266,272,278,284,291,297,303,309,315,322,328,334,340
%N A184523 Upper s-Wythoff sequence, where s=5n.  Complement of A184522.
%C A184523 See A184117 for the definition of lower and upper s-Wythoff sequences.
%F A184523 a(n) = floor((n/2)*(7+sqrt(29))). - _Jason Yuen_, Oct 16 2024
%t A184523 k = 5; r = -1; d = Sqrt[4 + k^2];
%t A184523 a[n_] := Floor[(1/2) (d + 2 - k) (n + r/(d + 2))];
%t A184523 b[n_] := Floor[(1/2) (d + 2 + k) (n - r/(d + 2))];
%t A184523 Table[a[n], {n, 120}]
%t A184523 Table[b[n], {n, 120}]
%Y A184523 Cf. A184117, A184522.
%K A184523 nonn,easy
%O A184523 1,1
%A A184523 _Clark Kimberling_, Jan 16 2011