A283903 Relative of Hofstadter Q-sequence.
11, 20, 6, 6, 6, 20, 11, 20, 6, 6, 6, 20, 11, 6, 12, 12, 12, 20, 11, 6, 18, 18, 12, 40, 11, 12, 24, 18, 12, 40, 11, 18, 30, 18, 18, 40, 11, 24, 30, 18, 18, 80, 11, 30, 30, 24, 24, 80, 11, 30, 36, 30, 24, 80, 11, 30, 48, 24, 24, 80, 11, 36, 54, 24, 24, 160, 11, 48, 42, 36, 30, 120, 11, 54, 42
Offset: 1
Links
- Nathan Fox, Table of n, a(n) for n = 1..2179
Programs
-
Maple
A283903:=proc(n) option remember: if n <= 0 then 0: elif n = 1 then 11: elif n = 2 then 20: elif n = 3 then 6: elif n = 4 then 6: elif n = 5 then 6: elif n = 6 then 20: elif n = 7 then 11: elif n = 8 then 20: elif n = 9 then 6: elif n = 10 then 6: elif n = 11 then 6: elif n = 12 then 20: elif n = 13 then 11: elif n = 14 then 6: elif n = 15 then 12: elif n = 16 then 12: elif n = 17 then 12: elif n = 18 then 20: else A283903(n-A283903(n-1)) + A283903(n-A283903(n-2)): fi: end:
Comments