cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-5 of 5 results.

A190763 Positions of 0 in A190762.

Original entry on oeis.org

3, 10, 17, 20, 27, 34, 44, 51, 58, 61, 68, 75, 85, 92, 99, 102, 109, 116, 119, 126, 133, 143, 150, 157, 160, 167, 174, 184, 191, 198, 201, 208, 215, 225, 232, 242, 249, 256, 259, 266, 273, 283, 290, 297, 300, 307, 314, 324, 331, 338, 341, 348, 355, 358, 365, 372, 382, 389, 396, 399, 406, 413, 423, 430, 437, 440, 447, 454, 464, 471
Offset: 1

Views

Author

Clark Kimberling, May 19 2011

Keywords

Comments

See A190762.

Crossrefs

Cf. A190762.

Programs

A190764 Positions of 1 in A190762.

Original entry on oeis.org

2, 5, 6, 9, 12, 13, 15, 16, 19, 22, 23, 26, 29, 30, 32, 33, 36, 37, 39, 40, 43, 46, 47, 50, 53, 54, 56, 57, 60, 63, 64, 67, 70, 71, 73, 74, 77, 78, 80, 81, 84, 87, 88, 90, 91, 94, 95, 97, 98, 101, 104, 105, 108, 111, 112, 114, 115, 118, 121, 122, 125, 128, 129, 131, 132, 135, 136, 138, 139, 142, 145, 146, 149, 152, 153, 155, 156, 159, 162
Offset: 1

Views

Author

Clark Kimberling, May 19 2011

Keywords

Comments

See A190762.

Crossrefs

Cf. A190762.

Programs

A190765 Positions of 2 in A190762.

Original entry on oeis.org

1, 4, 7, 8, 11, 14, 18, 21, 24, 25, 28, 31, 35, 38, 41, 42, 45, 48, 49, 52, 55, 59, 62, 65, 66, 69, 72, 76, 79, 82, 83, 86, 89, 93, 96, 100, 103, 106, 107, 110, 113, 117, 120, 123, 124, 127, 130, 134, 137, 140, 141, 144, 147, 148, 151, 154, 158, 161, 164, 165, 168, 171, 175, 178, 181, 182, 185, 188, 192, 195, 199, 202, 205, 206, 209
Offset: 1

Views

Author

Clark Kimberling, May 19 2011

Keywords

Comments

See A190762.

Crossrefs

Cf. A190762.

Programs

A120752 Numbers k such that {rk} <= c, where r = (1/2)^(1/2), c = 1/2 and { } denotes fractional part.

Original entry on oeis.org

2, 3, 6, 9, 10, 12, 13, 16, 17, 19, 20, 23, 26, 27, 30, 33, 34, 36, 37, 40, 43, 44, 47, 50, 51, 53, 54, 57, 58, 60, 61, 64, 67, 68, 70, 71, 74, 75, 77, 78, 81, 84, 85, 88, 91, 92, 94, 95, 98, 99, 101, 102, 105, 108, 109, 111, 112, 115, 116, 118, 119, 122, 125, 126, 129, 132
Offset: 1

Views

Author

Clark Kimberling, Jul 01 2006

Keywords

Comments

Positions of 0 in A083035.
The sequence is essentially identical to A090892 (see links).

Examples

			(See A120243.)

Links

Crossrefs

Cf. A083035, A120753, A190762.

Programs

  • 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 *)

A120753 Numbers k such that {rk} > c, where r = (1/2)^(1/2), c = 1/2 and { } denotes fractional part.

Original entry on oeis.org

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

Views

Author

Clark Kimberling, Jul 01 2006

Keywords

Comments

Positions of 1 in A083035.

Examples

			(See A120243.)

Crossrefs

Cf. A083035, A120752, A190762.

Programs

  • 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 *)
Showing 1-5 of 5 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.