|
%I #17 Sep 26 2018 22:18:21
%S 1,2,3,4,3,5,6,5,7,6,7,8,8,10,9,11,10,11,12,12,14,11,15,15,12,17,15,
%T 15,20,15,18,20,17,20,20,22,19,23,23,20,25,21,22,26,27,24,27,29,23,29,
%U 26,32,29,23,37,29,27,38,34,28,32,35,33,38,35,33,40,35,40
%N Relative of Hofstadter Q-sequence: a(n) = n for 1 <= n <= 4; a(n) = a(n-a(n-1)) + a(n-a(n-2)) for n > 4.
%C Similar to Hofstadter's Q-sequence A005185 but with different starting values.
%C Much like the Hofstadter Q-sequence, it is not known if this sequence is defined for all positive n.
%C a(n) exists for n <= 3*10^7.
%H Nathan Fox, <a href="/A278056/b278056.txt">Table of n, a(n) for n = 1..10000</a>
%H Altug Alkan, <a href="https://doi.org//10.1155/2018/8517125">On a Generalization of Hofstadter's Q-Sequence: A Family of Chaotic Generational Structures</a>, Complexity (2018) Article ID 8517125.
%H N. Fox, <a href="https://vimeo.com/191094180">Hofstadter-like Sequences over Nonstandard Integers</a>, Talk given at the Rutgers Experimental Mathematics Seminar, November 10 2016.
%t Nest[Append[#1, #1[[#2 - #1[[-1]] ]] + #1[[#2 - #1[[-2]] ]]] & @@ {#, 1 + Length@ #} &, Range@ 4, 65] (* _Michael De Vlieger_, Sep 26 2018 *)
%Y Cf. A005185, A278057, A278058, A278059, A278060, A278061, A278062, A278063, A278064, A278065.
%K nonn
%O 1,2
%A _Nathan Fox_, Nov 10 2016
|
