cp's OEIS Frontend

A188070 Positions of 1 in A188068; complement of A188069.

%I A188070 #33 Jun 25 2025 04:06:59
%S A188070 2,3,5,6,7,9,10,11,13,14,16,17,18,20,21,22,24,25,26,28,29,31,32,33,35,
%T A188070 36,37,39,40,41,43,44,46,47,48,50,51,52,54,55,57,58,59,61,62,63,65,66,
%U A188070 67,69,70,72,73,74,76,77,78,80,81,82,84,85,87,88,89,91,92,93,95,96,97,99,100,102,103,104,106,107,108,110,111,113,114,115,117,118,119,121,122,123,125
%N A188070 Positions of 1 in A188068; complement of A188069.
%C A188070 Cf. A188014, A188068.
%C A188070 Also positions of 3 in A007538. - _Reinhard Zumkeller_, Feb 14 2012
%C A188070 From _Peter G. Anderson_, Aug 24 2012: (Start)
%C A188070 a(n) = ceiling(n*x) where x = (1+sqrt(3))/2;
%C A188070 continued fraction of x is [1,2,1,2,1,2,...]. (End)
%C A188070 Conjectured partial sums of A245222. - _Sean A. Irvine_, Jun 26 2022
%t A188070 (* See A188068. *)
%o A188070 (Haskell)
%o A188070 a188070 n = a188070_list !! (n-1)
%o A188070 a188070_list = filter ((== 3) . a007538) [1..]
%o A188070 -- _Reinhard Zumkeller_, Feb 14 2012
%o A188070 (J)  >. (2 %~ 1 + %:3) * i.100  NB. _Peter G. Anderson_, Aug 24 2012
%Y A188070 Cf. A188014, A188068, A188069.
%Y A188070 A215781 is ceiling(n*(sqrt(3)-1)).
%K A188070 nonn
%O A188070 1,1
%A A188070 _Clark Kimberling_, Mar 20 2011