OFFSET
1,2
COMMENTS
See A186219 for a discussion of adjusted joint rank sequences.
Differs from A059555 at n=97, 123, 194, 220, 246, ... - R. J. Mathar, May 18 2020
EXAMPLE
MATHEMATICA
(* adjusted joint rank sequences a and b, using general formula for ranking ui^2+vi+w and xj^2+yj+z *)
d = 1/2; u = 1; v = 0; w = 0; x = 3; y = 0; z = -2;
h[n_] := -y + (4 x (u*n^2 + v*n + w - z - d) + y^2)^(1/2);
a[n_] := n + Floor[h[n]/(2 x)];
k[n_] := -v + (4 u (x*n^2 + y*n + z - w + d) + v^2)^(1/2);
b[n_] := n + Floor[k[n]/(2 u)];
Table[a[n], {n, 1, 100}] (* A186539 *)
Table[b[n], {n, 1, 100}] (* A186540 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Feb 23 2011
STATUS
approved