年度呼吁:请向OEIS基金会捐款支持OEIS的持续开发和维护。现在是我们的第61年,我们有超过378000个序列,我们已经获得了11000条引文(通常说“多亏了OEIS才发现”)。
(MAGMA公司岩浆)RoundToEven:=函数(n);d: =楼层(n);如果n-d ne 1/2,则返回Round(n);否则返回d+(d mod 2);结束if;端函数;[RoundToEven(2*(3/2)^n):n in[1..39]]//克劳斯·布罗克豪斯2008年11月17日
OEIS服务器: https://oeis.org/edit/global/2944
提出
经核准的
编辑
Eric Weistein的《数学世界》,<a href=“http://mathworld.wolfram.com/NearestIntegerFunction.html“>最近整数函数</a>
Eric Weisstein的《数学世界》,<a href=“http://mathworld.wolfram.com/NearestIntegerFunction.html“>最近整数函数</a>
文森佐·利班迪(Vincenzo Librandi),<a href=“/A147789号/b147789.txt“>n表,n=1..1000时为a(n)</a>
(PARI){RoundToEven(n)=局部(d);d=divrem(n,1);如果(d[2]<>1/2,round(n),d[1]+d[1]%2)} {对于(n个=1, 39, 打印1(圆角到偶数(2*(三/2)^n个), ","))} \\ _克劳斯 布罗克豪斯_, 十一月 17 2008
{对于(n=1,39,打印1(RoundToEven(2*(3/2)^n),“,”)}\\克劳斯·布罗克豪斯2008年11月17日