login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

a(n) = n + [nr/t] + [ns/t]; r=Pi/2, s=arcsin(8/17), t=arcsin(15/17).
3

%I #9 Jan 09 2024 13:08:55

%S 2,4,8,10,14,16,20,22,26,28,30,34,36,40,42,46,48,52,54,58,60,62,66,68,

%T 72,74,78,80,84,86,90,92,94,98,100,104,106,110,112,116,118,122,124,

%U 126,130,132,136,138,142,144,148,150,154,156,158,162,164,168,170,174,176,180,182,186,188,190,194,196,200,202,206,208,212,214,216,220,222,226

%N a(n) = n + [nr/t] + [ns/t]; r=Pi/2, s=arcsin(8/17), t=arcsin(15/17).

%C See A189781.

%t (See A189781.)

%t Table[n+Floor[(n Pi/2)/ArcSin[15/17]]+Floor[(n ArcSin[8/17])/ArcSin[15/17]],{n,100}] (* _Harvey P. Dale_, Jan 09 2024 *)

%Y Cf. A189781, A189783, A189784=(A189782)/2.

%K nonn

%O 1,1

%A _Clark Kimberling_, Apr 27 2011