|
%I #13 May 14 2021 15:29:58
%S 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,
%T 27,28,30,30,31,32,34,34,36,36,38,38,39,42,41,48,43,44,49,46,47,49,52,
%U 51,51,52,53,56,56,56,63,58,59,60,61,65,64,64,66,66,67
%N 2-adic valuation of A016090.
%C a(n) >= n.
%C It appears that the density of n such that a(n) = n is 1/2.
%H Eric M. Schmidt, <a href="/A214881/b214881.txt">Table of n, a(n) for n = 1..10000</a>
%H <a href="/index/Ar#automorphic">Index entries for sequences related to automorphic numbers</a>
%o (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;
%Y Cf. A016090, A214880, A214882, A214883.
%K nonn,base
%O 1,2
%A _Eric M. Schmidt_, Jul 29 2012
|
