A187683 - OEIS

A187683

Rank transform of the sequence floor(2n/3); complement of A187683.

1, 2, 4, 5, 7, 8, 9, 11, 13, 14, 15, 17, 18, 20, 22, 23, 24, 26, 27, 28, 30, 31, 33, 35, 36, 37, 39, 40, 42, 43, 44, 46, 47, 48, 50, 52, 53, 55, 56, 57, 59, 61, 62, 64, 65, 66, 68, 70, 71, 72, 74, 75, 76, 78, 79, 81, 83, 84, 85, 87, 88, 90, 91, 92, 94, 96, 97, 99, 100, 101, 103, 105, 106, 108, 109, 110, 112, 113, 114, 116, 118, 119, 120, 122, 123, 125, 127, 128, 129, 131, 132, 133, 135, 136, 138

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

COMMENTS

See A187224.

LINKS

Table of n, a(n) for n=1..95.

MATHEMATICA

seqA = Table[Floor[2n/3], {n, 1, 220}]

seqB = Table[n, {n, 1, 220}]; (*A000027*)

jointRank[{seqA_,

seqB_}] := {Flatten@Position[#1, {_, 1}],