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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A190240 Positions of 0 at A190239; complement of A190241. 4
5, 10, 15, 20, 21, 25, 26, 29, 30, 31, 34, 35, 36, 39, 40, 41, 42, 44, 45, 46, 47, 49, 50, 51, 52, 53, 54, 58, 63, 68, 73, 77, 78, 79, 82, 83, 84, 87, 88, 89, 92, 93, 94, 97, 98, 99, 100, 102, 103, 104, 105, 106, 107, 108, 116, 121, 126, 130, 131, 135, 136, 137, 140, 141, 142, 145, 146, 147, 150, 151, 152, 153, 154, 155, 156, 157 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

G. C. Greubel, Table of n, a(n) for n = 1..5500

MATHEMATICA

u = Exp[Pi/2]; v = 1/u;

f[n_] := Floor[n*u + n*v] - Floor[n*u] - Floor[n*v]

t = Table[f[n], {n, 1, 120}] (*A190239*)

Flatten[Position[t, 0]]      (*A190240*)

Flatten[Position[t, 1]]      (*A190241*)

CROSSREFS

Cf. A190239, A190241.

Sequence in context: A307151 A109046 A048725 * A199860 A101889 A115772

Adjacent sequences:  A190237 A190238 A190239 * A190241 A190242 A190243

KEYWORD

nonn

AUTHOR

Clark Kimberling, May 06 2011

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 October 19 04:40 EDT 2019. Contains 328211 sequences. (Running on oeis4.)