|
|
A259368
|
|
Number of digits in n^n when written in binary.
|
|
0
|
|
|
1, 3, 5, 9, 12, 16, 20, 25, 29, 34, 39, 44, 49, 54, 59, 65, 70, 76, 81, 87, 93, 99, 105, 111, 117, 123, 129, 135, 141, 148, 154, 161, 167, 173, 180, 187, 193, 200, 207, 213, 220, 227, 234, 241, 248, 255, 262, 269, 276, 283, 290, 297, 304, 311, 318, 326, 333
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = floor(n*log(n)/log(2)) + 1.
|
|
EXAMPLE
|
For n=3, 3^3=11011_2 so a(3)=5.
|
|
MATHEMATICA
|
Array[IntegerLength[#^#, 2] &, 60] (* or *)
|
|
PROG
|
(Magma) [Floor(n*Log(n)/Log(2)) + 1: n in [1..70]]; // Vincenzo Librandi, Jul 15 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|