login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A332479 a(n) = [2^n/(1 - cos(1/n))] - [2^n/(-1 + cot(1/n))] - [2^n/(1 - cos(1/n)) - 2^n/(-1 + cot(1/n))], where [ ] = floor. 5
1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0 (list; graph; refs; listen; history; text; internal format)
OFFSET

1

LINKS

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

FORMULA

a(n) = [2^n/(1 - cos(1/n))] - [2^n/(-1 + cot(1/n))] - [2^n/(1 - cos(1/n) -2^n/(-1 + cot(1/n))], where [ ] = floor.

MATHEMATICA

z = 50; u = Table[Floor[2^n/(1 - Cos[1/n])], {n, 1, z}]    (* A332430 *)

v = Table[Floor[2^n/(-1 + Cot[1/n])], {n, 1, z}]  (* A332431 *)

u - v   (* A332432 *)

w = Table[Floor[2^n/(1 - Cos[1/n]) - 2^n/(-1 + Cot[1/n])], {n, 1, z}]

u - v - w  (* A332479 *)

CROSSREFS

Cf. A333186, A333189, A332430, A332431, A332432, A332433.

Sequence in context: A170966 A190245 A328100 * A190210 A014394 A014779

Adjacent sequences:  A332476 A332477 A332478 * A332480 A332481 A332482

KEYWORD

nonn,easy

AUTHOR

Clark Kimberling, Apr 05 2020

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 September 25 00:48 EDT 2020. Contains 337333 sequences. (Running on oeis4.)