A214881 2-adic valuation of A016090.
1, 2, 3, 5, 5, 6, 8, 8, 9, 13, 14, 14, 14, 14, 15, 17, 17, 18, 21, 21, 22, 23, 26, 26, 26, 26, 27, 28, 30, 30, 31, 32, 34, 34, 36, 36, 38, 38, 39, 42, 41, 48, 43, 44, 49, 46, 47, 49, 52, 51, 51, 52, 53, 56, 56, 56, 63, 58, 59, 60, 61, 65, 64, 64, 66, 66, 67
Offset: 1
Links
Programs
-
GAP
A214881 := function(max) local result, i; result := [6]; for i in [2..max] do Add(result, (2*result[i-1] - result[i-1]^2) mod 10^i); od; result := List(result, x->Valuation(x, 2)); return result; end;
Comments