A025703 Index of 4^n within sequence of numbers of form 4^i*6^j.
1, 2, 4, 7, 11, 15, 20, 26, 33, 40, 48, 57, 67, 78, 89, 101, 114, 128, 142, 157, 173, 190, 208, 226, 245, 265, 286, 307, 329, 352, 376, 400, 425, 451, 478, 506, 534, 563, 593, 624, 655, 687, 720, 754, 789, 824, 860, 897, 935, 973, 1012, 1052, 1093, 1135, 1177, 1220
Offset: 0
Links
- Robert Israel, Table of n, a(n) for n = 0..10000
Programs
-
Maple
N:= 200: # to get a(0) to a(N) [$1..N+1] + ListTools:-PartialSums([seq(floor(j*log[6](4)),j=0..N)]); # Robert Israel, May 10 2015
-
PARI
a(n)=my(N=1); n+1+sum(i=1, n, logint(N*=4, 6)); \\ Charles R Greathouse IV, Jan 11 2018
-
PARI
first(n)=my(s, N=1/4); vector(n+1, i, s+=logint(N*=4, 6)+1) \\ Charles R Greathouse IV, Jan 11 2018
Formula
a(n) = n + 1 + Sum(j= 1 .. n, floor(j*log[6](4))). - Robert Israel, May 10 2015
Extensions
Edited and offset corrected by Robert Israel, May 10 2015
Comments