模数如何与R中的负数一起使用？

Question

模数如何与R中的负整数一起工作：

-90 %% 360
90 %% -360
-400 %% 360
400 %% -360

输出：

270
-270
320
-320

这背后的理由是什么？

@JimSlonder的回答：

a <- c(-90,90,-400,400)
b <- c(360,-360,360,-360)

modulus <- function(a,b)
  a-floor(a/b)*b


all("%%"(a,b) == modulus(a,b))