|
|
A022331
|
|
Index of 2^n within sequence of numbers of form 2^i*3^j (A003586).
|
|
8
|
|
|
1, 2, 4, 6, 9, 13, 17, 22, 28, 34, 41, 48, 56, 65, 74, 84, 95, 106, 118, 130, 143, 157, 171, 186, 202, 218, 235, 253, 271, 290, 309, 329, 350, 371, 393, 416, 439, 463, 487, 512, 538, 564, 591, 619, 647, 676, 706, 736, 767, 798, 830, 863, 896, 930, 965, 1000, 1036, 1072
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
c[0] = 1; c[n_] := 1 + Sum[Ceiling[j*Log[3, 2]], {j, n}]; Table[c[i], {i, 0, 60}] (* Norman Carey, Jun 13 2012 *)
|
|
PROG
|
(PARI) a(n)=my(t=1); 1+n+sum(k=1, n, logint(t*=2, 3)) \\ Ruud H.G. van Tol, Nov 25 2022
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|