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.

A045774 Extension of Beatty sequence; complement of A045775.

This page as a plain text file.
%I A045774 #28 Jan 25 2019 11:44:32
%S A045774 0,1,2,3,4,6,7,8,9,11,12,13,14,16,17,18,19,21,22,23,24,25,26,27,29,30,
%T A045774 31,32,34,35,36,37,39,40,41,42,44,45,46,47,48,49,50,52,53,54,55,57,58,
%U A045774 59,60,62,63,64,65
%N A045774 Extension of Beatty sequence; complement of A045775.
%C A045774 (s,t)-sequences; the case s=3, t=2.
%H A045774 A. S. Fraenkel, <a href="https://arxiv.org/abs/math/9809074">Heap games, numeration systems and sequences</a>, arXiv:math/9809074 [math.CO], 1998; Annals of Combinatorics, 2 (1998), 197-210.
%H A045774 Clark Kimberling, <a href="https://cs.uwaterloo.ca/journals/JIS/VOL10/Kimberling/kimberling26.html">Complementary equations</a>, J. Int. Seq. 19 (2007), 1-13.
%H A045774 Wen An Liu and Xiao Zhao, <a href="http://dx.doi.org/10.1016/j.dam.2014.08.009">Adjoining to (s,t)-Wythoff's game its P-positions as moves</a>, Discrete Applied Mathematics, 179 (2014), 28-43. See Table 5.
%H A045774 <a href="/index/Be#Beatty">Index entries for sequences related to Beatty sequences</a>
%F A045774 a(n)=mex {a(i), b(i):0 <= i<n}, where b=A045775, mex S=least integer >= 0 not in the sequence S.
%t A045774 s=3; t=2;
%t A045774 mex:=First[Complement[Range[1,Max[#1]+1],#1]]&;
%t A045774 a[0]=0; b[n_]:=b[n]=s*a[n]+t*n;
%t A045774 a[n_]:=a[n]=mex[Flatten[Table[{a[i],b[i]},{i,0,n-1}]]];
%t A045774 Table[a[n],{n,200}] (* A045774 *)
%t A045774 Table[b[n],{n,200}] (* A045775 *)
%t A045774 (* _Clark Kimberling_, Apr 02 2011 *)
%Y A045774 Cf. A045749, A045750.
%K A045774 nonn
%O A045774 0,3
%A A045774 _Aviezri S. Fraenkel_