login
This site is supported by donations to The OEIS Foundation.

 

Logo

Annual Appeal: Please make a donation to keep the OEIS running. In 2018 we replaced the server with a faster one, added 20000 new sequences, and reached 7000 citations (often saying "discovered thanks to the OEIS").
Other ways to donate

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A081117 Differences of Beatty sequence for cube root of 2. 0
1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

LINKS

Table of n, a(n) for n=0..104.

FORMULA

a(n)=floor((n+1)*2^(1/3))-floor(n*2^(1/3))

MATHEMATICA

With[{c=Surd[2, 3]}, Differences[Floor[Range[0, 110]c]]] (* Harvey P. Dale, Jan 30 2015 *)

PROG

(PARI) a(n)=floor((n+1)*2^(1/3))-floor(n*2^(1/3))

CROSSREFS

Sequence in context: A138191 A069291 A268238 * A129252 A022929 A161102

Adjacent sequences:  A081114 A081115 A081116 * A081118 A081119 A081120

KEYWORD

nonn

AUTHOR

Benoit Cloitre, Apr 16 2003

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified December 11 04:29 EST 2018. Contains 318049 sequences. (Running on oeis4.)