|
%I M3298 #40 Dec 20 2023 08:05:03
%S 1,4,7,9,12,14,17,20,22,25,27,30,33,35,38,41,43,46,48,51,54,56,59,62,
%T 64,67,69,72,75,77,80,82,85,88,90,93,96,98,101,103,106,109,111,114,
%U 117,119,122,124,127,130,132,135
%N Numbers not of form "nearest integer to n*tau", tau = (1+sqrt(5))/2.
%C First column of Stolarsky array.
%C This sequence and A057843 are very similar - this can be seen if the terms equal to 4 are aligned. - _Thomas Baruchel_, Nov 04 2003
%D Clark Kimberling, "Stolarsky interspersions," Ars Combinatoria 39 (1995) 129-138.
%D N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%H Vincenzo Librandi, <a href="/A007064/b007064.txt">Table of n, a(n) for n = 1..1000</a>
%H Benoit Cloitre and Jeffrey Shallit, <a href="https://arxiv.org/abs/2312.11706">Some Fibonacci-Related Sequences</a>, arXiv:2312.11706 [math.CO], 2023.
%H Clark Kimberling, <a href="http://faculty.evansville.edu/ck6/integer/intersp.html">Interspersions</a>
%H Clark Kimberling, <a href="https://doi.org/10.1090/S0002-9939-1993-1111434-0">Interspersions and dispersions</a>, Proceedings of the American Mathematical Society 117 (1993) 313-321.
%H N. J. A. Sloane, <a href="/classic.html#WYTH">Classic Sequences</a>
%H K. B. Stolarsky, <a href="http://www.fq.math.ca/Scanned/15-3/stolarsky.pdf">A set of generalized Fibonacci sequences such that each natural number belongs to exactly one</a>, Fib. Quart., 15 (1977), 224.
%F a(n) = floor[n*(1+tau)-tau/2] =floor[n*2.6180...-0.8090...]. - _Henry Bottomley_, Sep 03 2001
%t max = 100; Complement[ Range[ max*GoldenRatio], Round[ Range[max]*GoldenRatio]] (* _Jean-François Alcover_, Oct 10 2011 *)
%o (PARI) a(n) = tau=(1+sqrt(5))/2; floor(n*(1+tau) - tau/2) \\ _Michel Marcus_, May 21 2013
%Y Complement of A007067.
%Y Cf. A001622, A035506.
%K nonn,easy,nice
%O 1,2
%A _N. J. A. Sloane_, _Mira Bernstein_
|
