login
A293779
a(n) is the least nonnegative exponent k such that 2^k ends in A095810(n).
1
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
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
KEYWORD
nonn,base
AUTHOR
David A. Corneth, Oct 17 2017
STATUS
approved