A079632 a(n) = floor(n/floor(sqrt(n)))-floor(sqrt(n)).

0, 1, 2, 0, 0, 1, 1, 2, 0, 0, 0, 1, 1, 1, 2, 0, 0, 0, 0, 1, 1, 1, 1, 2, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 2, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 2, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 0, 0, 0, 0, 0, 0

Offset

1,3

Links

Table of n, a(n) for n=1..105.

Mike Müller, Svetlana Puzynina, Michaël Rao, Infinite square-free self-shuffling words, arXiv:1401.6536 [cs.DM], 2014. See Example 10 p. 7.

Formula

a(A064801(n))=0; a(A005563(n))=2.

Mathematica

Table[Floor[n/Floor[Sqrt[n]]]-Floor[Sqrt[n]], {n, 110}] (* Harvey P. Dale, Feb 04 2016 *)

Prog

(PARI) a(n)=floor(n/sqrtint(n))-sqrtint(n)

Crossrefs

Cf. A005563, A064801.

Sequence in context: A204263 A228347 A209314 * A002654 A113652 A106139

Adjacent sequences: A079629 A079630 A079631 * A079633 A079634 A079635

Keyword

nonn

Author

Benoit Cloitre, Jan 30 2003

Status

approved