login
A120753
Numbers k such that {rk} > c, where r = (1/2)^(1/2), c = 1/2 and { } denotes fractional part.
3
1, 4, 5, 7, 8, 11, 14, 15, 18, 21, 22, 24, 25, 28, 29, 31, 32, 35, 38, 39, 41, 42, 45, 46, 48, 49, 52, 55, 56, 59, 62, 63, 65, 66, 69, 72, 73, 76, 79, 80, 82, 83, 86, 87, 89, 90, 93, 96, 97, 100, 103, 104, 106, 107, 110, 113, 114, 117, 120, 121, 123, 124, 127, 128, 130, 131
OFFSET
1,2
COMMENTS
Positions of 1 in A083035.
EXAMPLE
(See A120243.)
MATHEMATICA
r = Sqrt[1/2]; b = 2; c = 0;
f[n_] := Floor[(b*n + c)*r] - b*Floor[n*r] - Floor[c*r];
t = Table[f[n], {n, 1, 200}] (* A083035 *)
Flatten[Position[t, 0]] (* A120752 *)
Flatten[Position[t, 1]] (* A120753 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jul 01 2006
STATUS
approved

pFad - Phonifier reborn

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.


Alternative Proxies:

Alternative Proxy

pFad Proxy

pFad v3 Proxy

pFad v4 Proxy