This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A059651 #2 May 01 2014 02:46:11 %S A059651 0,-1,0,0,-1,-1,0,0,-1,0,-1,0,0,-1,0,0,-1,-1,0,1,-1,0,-1,0,0,-1,0,-1, %T A059651 -1,0,0,-1,-1,0,0,-1,0,0,0,-1,0,0,0,-1,-1,0,1,-1,0,0,0,-1,0,0,-1,0,-1, %U A059651 0,0,-1,0,0,-1,0,0,0,-1,0,-1,0,0,-1,0,0,-1,0,0,-1,-1,0,0,-1,0,-1,0,-1,-1,0,0,-1,-1,0,1,-1,0,0,0,-1,0,0,0,-1,-1,0,-1,-1,0,0,-1,0,0,0,-1,0,-1,0,0,-1,0,0 %N A059651 a(n) = [[(k^2)*n]-(k*[k*n])], where k = cube root of 2 and [] is the floor function. %C A059651 The values of (floor((k^2)*j)-(k*(floor(k*j)))) for j=0..50, where k=2^(1/3), are 0, -0.259921, 0.480158, 0.220237, -0.299605, -0.559526, 0.180553, 0.92063, -0.59921, ... %p A059651 Digits := 89; floor_diffs_floored(evalf(2^(1/3)),120); %Y A059651 A059648 gives similar sequence for k=sqrt(2). Positions of +1's: A059657, positions of -1's A059659. %K A059651 sign %O A059651 0,1 %A A059651 _Antti Karttunen_, Feb 03 2001