OFFSET
1,1
COMMENTS
See A186350 for a discussion of adjusted joint rank sequences.
EXAMPLE
MATHEMATICA
(* adjusted joint rank sequences a and b, using general formula for ranking 1st degree u*n+v and 2nd degree x*n^2+y*n+z *)
d=1/2; u=8; v=0; x=1; y=0;
h[n_]:=(-y+(4x(u*n+v-d)+y^2)^(1/2))/(2x);
a[n_]:=n+Floor[h[n]];
k[n_]:=(x*n^2+y*n-v+d)/u;
b[n_]:=n+Floor[k[n]];
Table[a[n], {n, 1, 120}] (* A186346 *)
Table[b[n], {n, 1, 100}] (* A186347 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Feb 20 2011
STATUS
approved