|
Search: id:A054248
|
|
|
| A054248 |
|
Binary entropy: a(n) = n + min { a(k)+a(n-k) : 1 <= k <= n-1 }. |
|
+0
2
|
|
| 1, 2, 6, 8, 13, 16, 21, 24, 30, 34, 40, 44, 50, 54, 60, 64, 71, 76, 83, 88, 95, 100, 107, 112, 119, 124, 131, 136, 143, 148, 155, 160, 168, 174, 182, 188, 196, 202, 210, 216, 224, 230, 238, 244, 252, 258, 266, 272, 280, 286, 294, 300, 308, 314
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
REFERENCES
|
D. E. Knuth, The Art of Computer Programming. Addison-Wesley, Reading, MA, Vol. 3, p. 374.
|
|
MAPLE
|
A054248 := proc(n) local i, j; option remember; if n<=2 then n else j := 10^10; for i from 1 to n-1 do if A054248(i)+A054248(n-i) < j then j := A054248(i)+A054248(n-i); fi; od; n+j; fi; end;
|
|
CROSSREFS
|
Cf. A003314.
Sequence in context: A113462 A065392 A030457 this_sequence A038108 A087327 A002511
Adjacent sequences: A054245 A054246 A054247 this_sequence A054249 A054250 A054251
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
njas, May 04 2000
|
|
|
Search completed in 0.002 seconds
|
