OFFSET
1,1
COMMENTS
Sequence seems to be composed of three different integers 3, 16 and 19. Further comments in A293700.
MATHEMATICA
rootsn = Flatten[Position[Table[Floor[Tan[-n]], {n, 1, 10^6}], 1]];
difn = Differences[rootsn];
CROSSREFS
KEYWORD
nonn
AUTHOR
V.J. Pohjola, Oct 16 2017
STATUS
approved