|
%I #16 Jul 09 2024 08:55:02
%S 2,5,7,10,12,15,18,20,23,25,28,31,33,36,38,41,43,46,49,51,54,56,59,62,
%T 64,67,69,72,75,77,80,82,85,87,90,93,95,98,100,103,106,108,111,113,
%U 116,119,121,124,126,129,131,134,137,139,142
%N Beatty sequence for 1+2^(2/3).
%C Let u=2^(1/3). Jointly rank {j*u} and {k/u} as in the first comment at A182760; a(n) is the position of n*u.
%H Paolo Xausa, <a href="/A182773/b182773.txt">Table of n, a(n) for n = 1..10000</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/BeattySequence.html">Beatty Sequence</a>.
%H <a href="/index/Be#Beatty">Index entries for sequences related to Beatty sequences</a>.
%F a(n) = floor(n*(1+2^(2/3))).
%t Floor[Range[100]*(1 + 2^(2/3))] (* _Paolo Xausa_, Jul 09 2024 *)
%Y Cf. A005480, A182760, A182774.
%K nonn
%O 1,1
%A _Clark Kimberling_, Nov 30 2010
|
