<!-- language-all: lang-r -->

# [R](https://www.r-project.org), <s>57</s> 55 bytes

<pre><code>\(n)cbind(a&lt;-1:n+1,b&lt;-a%x%!!a)[order(a^b,rep(a,n))[n],]</code></pre>

[Attempt This Online!](https://ato.pxeger.com/run?1=m72waMGSNAUb3aWlJWm6FjfNYzTyNJOTMvNSNBJtdA2t8rQNdZJsdBNVK1QVFRM1o_OLUlKLNBLjknSKUgs0EnXyNDWj82J1YiHa1xUnFhTkVGoYWhka6KRpQgQXLIDQAA)

Returns the \$n^\text{th}\$ value.

-2 bytes thanks to pajonk.