|
%I #16 Sep 10 2016 10:35:05
%S 1,1,0,1,1,0,1,1,0,1,1,1,0,1,1,0,1,1,0,1,1,0,1,1,1,0,1,1,0,1,1,0,1,1,
%T 0,1,1,1,0,1,1,0,1,1,0,1,1,1,0,1,1,0,1,1,0,1,1,0,1,1,1,0,1,1,0,1,1,0,
%U 1,1,0,1,1,1,0,1,1,0,1,1
%N Characteristic function of floor(36*n/25).
%H Fraenkel, Aviezri S., Mordechai Mushkin, and Uzi Tassa, <a href="http://cms.math.ca/10.4153/CMB-1978-077-0">Determination of floor(n*theta) by its sequence of differences</a>, Canad. Math. Bull 21:4 (1978), pp. 441-446.
%F Periodic with period (110110110111011011011011101101101101).
%o (PARI) lista(nn) = my(v=vector(nn, k, 36*k\25)); for (k=1, nn, print1(vecsearch(v, k)>0, ", ")); \\ _Michel Marcus_, Sep 10 2016
%Y Cf. A276394.
%K nonn
%O 1
%A _N. J. A. Sloane_, Sep 09 2016
|
