A293779 a(n) is the least nonnegative exponent k such that 2^k ends in A095810(n).

0, 1, 2, 4, 3, 9, 4, 10, 7, 5, 16, 18, 11, 21, 8, 6, 15, 17, 20, 14, 19, 13, 12, 42, 89, 7, 76, 18, 21, 95, 80, 34, 13, 43, 24, 90, 65, 51, 8, 86, 77, 19, 32, 22, 49, 47, 96, 98, 81, 35, 100, 14, 73, 83, 44, 70, 25, 91, 28, 66, 37, 59, 52, 102, 9, 87, 16, 78, 41, 75

Offset

1,3

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Formula

n = 6: A095810(6) = 12. k = 9 is the least nonnegative integer such that 2^k ends in 12. Therefore, a(6) = 9.

Maple

# assuming A095810[1]..A095810[N] are assigned
f:= proc(i) local s, v, t;
     s:= msolve(2^x=A095810[i], 10^(1+ilog10(A095810[i])));
     v:= indets(rhs(s[1]), name);
     if v <> {} then subs(seq(t=0, t=v), rhs(s[1])) else rhs(s[1]) fi
end proc:
map(f, [$1..N]); # Robert Israel, Dec 29 2017

Crossrefs

Cf. A095810.

Sequence in context: A198931 A344425 A340896 * A063379 A000463 A366260

Adjacent sequences: A293776 A293777 A293778 * A293780 A293781 A293782

Keyword

nonn,base

Author

David A. Corneth, Oct 17 2017

Status

approved