A189785 -id:A189785 - cp's OEIS frontend

A189787 a(n) = A189785(n)/2.

3, 7, 11, 15, 19, 23, 27, 31, 35, 39, 43, 47, 51, 55, 59, 63, 67, 71, 75, 79, 83, 87, 91, 95, 99, 103, 107, 111, 115, 119, 123, 127, 131, 135, 139, 143, 147, 151, 155, 159, 163, 167, 171, 175, 179, 183, 187, 190, 194, 198, 202, 206, 210, 214, 218, 222, 226, 230, 234, 238, 242, 246, 250, 254, 258, 262, 266, 270, 274, 278, 282

Offset: 1

Clark Kimberling, Apr 27 2011

nonn

See A189785.

Cf. A189785, A189786.

Mathematica
```
(See A189785.)
```

Name corrected by Nathaniel Johnston and R. J. Mathar, May 16 2011

Comment and formula corrected by Jaroslav Krizek, Jul 29 2016

A189786 a(n) = n + [nr/t] + [ns/t]; r=Pi/2, s=arcsin(5/13), t=arcsin(12/13).

Original entry on oeis.org

2, 4, 8, 10, 12, 16, 18, 20, 24, 26, 28, 32, 34, 36, 40, 42, 44, 48, 50, 52, 56, 58, 60, 64, 66, 68, 72, 74, 76, 80, 82, 84, 88, 90, 92, 96, 98, 100, 104, 106, 108, 112, 114, 116, 120, 122, 124, 128, 130, 132, 136, 138, 140, 144, 146, 148, 152, 154, 156, 160, 162, 164, 168, 170, 172, 176, 178, 180, 184, 186, 188, 192, 194, 196, 200, 202, 204

Offset: 1

Clark Kimberling, Apr 27 2011

See A189785.
Conjecture: Sequence consists of all the positive even numbers except numbers of the form 8*x+6, x >= 0. - Harvey P. Dale, Dec 07 2018
Contains numbers like a(143)=382, a(146)=390, a(149)=398, a(152)=406,... which are not in A047464. - R. J. Mathar, Aug 25 2025
For n<143, a(n) = n+A047217(n+1), but then this formula becomes invalid. - R. J. Mathar, Aug 25 2025

Cf. A189785, A189787.

(See A189785.)
With[{t=ArcSin[12/13]},Table[n+Floor[(n*Pi/2)/t]+Floor[(n*ArcSin[5/13])/t],{n,80}]] (* Harvey P. Dale, Dec 07 2018 *)

cp's OEIS Frontend

A189787 a(n) = A189785(n)/2.

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

Extensions