|
%I #11 Dec 20 2022 02:08:06
%S 6,12,18,25,31,37,44,50,56,63,69,75,82,88,94,100,107,113,119,126,132,
%T 138,145,151,157,164,170,176,182,189,195,201,208,214,220,227,233,239,
%U 246,252,258,264,271,277,283,290,296,302,309,315,321,328,334,340,346
%N a(n) = floor(n/(1-sin(1))).
%C Beatty sequence for 1/(1-sin(1)); complement of A108120.
%H G. C. Greubel, <a href="/A108587/b108587.txt">Table of n, a(n) for n = 1..5000</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>
%t Table[Floor[n/(1-Sin[1])], {n, 60}] (* _G. C. Greubel_, Dec 19 2022 *)
%o (Magma) [Floor(n/(1-Sin(1))): n in [1..60]]; // _G. C. Greubel_, Dec 19 2022
%o (SageMath) [int(n/(1-sin(1))) for n in range(1,61)] # _G. C. Greubel_, Dec 19 2022
%Y Cf. A038130, A049469, A108120, A108593, A206530.
%K nonn
%O 1,1
%A _Reinhard Zumkeller_, Jun 11 2005
|
