(MAGMAMagma) [n + Floor(n/3) + Floor(n*Sqrt(2/3)) + Floor(n*Sqrt(1/6)): n in [1..30]]; // G. C. Greubel, Jan 31 2018
(MAGMAMagma) [n + Floor(n/3) + Floor(n*Sqrt(2/3)) + Floor(n*Sqrt(1/6)): n in [1..30]]; // G. C. Greubel, Jan 31 2018
proposed
approved
editing
proposed
n + [n*r/t] + [n*s/t] + [n*u/t]; r=sqrt(2), s=1/r, t=sqrt(3), u=1/t.
proposed
editing
editing
proposed
r:=sqrt(2): s:=1/r: t:=sqrt(3): u:=1/t: seq(n + floor(n*r/t) + floor(n*s/t) + floor(n*u/t), n=1..10^3); # Muniru A Asiru, Feb 01 2018
proposed
editing
editing
proposed
n + [nrn*r/t] + [nsn*s/t] + [nun*u/t]; r=sqrt(2), s=1/r, t=sqrt(3), u=1/t.
G. C. Greubel, <a href="/A190366/b190366.txt">Table of n, a(n) for n = 1..10000</a>
(See A190364.)
Table[n + Floor[n/3] + Floor[n*Sqrt[2/3]] + Floor[n*Sqrt[1/6]], {n, 1, 30}] (* G. C. Greubel, Jan 31 2018 *)
(PARI) for(n=1, 30, print1(n + floor(n/3) + floor(n*sqrt(2/3)) + floor(n*sqrt(1/6)), ", ")) \\ G. C. Greubel, Jan 31 2018
(MAGMA) [n + Floor(n/3) + Floor(n*Sqrt(2/3)) + Floor(n*Sqrt(1/6)): n in [1..30]]; // G. C. Greubel, Jan 31 2018
approved
editing
_Clark Kimberling (ck6(AT)evansville.edu), _, May 09 2011
proposed
approved