|
%I #15 Feb 05 2023 01:59:46
%S 3,5,8,13,17,21,25,28,32,34,38,41,45,50,52,55,59,62,66,71,73,79,81,84,
%T 89,93,96,100,105,107,113,115,118,122,126,128,131,136,140,144,148,151,
%U 155,160,162,168,170,173,177,181,183,186,191,195,198,202,204,207,212,216,220,224,227
%N Numbers k such that k+1 is in A095096 and k is in A020899.
%D Anton Shutov, On the sum of digits of the Zeckendorf representations of two consecutive numbers, Fib. Q., 58:3 (2020), 203-207.
%H Amiram Eldar, <a href="/A337289/b337289.txt">Table of n, a(n) for n = 1..10000</a>
%t SequencePosition[Mod[DigitCount[Select[Range[0, 3000], BitAnd[#, 2 #] == 0 &], 2, 1], 2], {1, 0}][[;; , 1]] - 1 (* _Amiram Eldar_, Feb 05 2023 *)
%Y Cf. A020899, A095096, A337287, A337287, A337290, A337634, A337635, A337636, A337637.
%K nonn,base
%O 1,1
%A _N. J. A. Sloane_, Sep 12 2020
|
