小编use*_*941的帖子

我将(x, y)值存储在数据帧中.我想返回最常出现的(x, y)组合.

这是一个例子:

> x = c(1, 1, 2, 3, 4, 5, 6)
> y = c(1, 1, 5, 6, 9, 10, 12)
> xy = data.frame(x, y)
> xy
  x  y
1 1  1
2 1  1
3 2  5
4 3  6
5 4  9
6 5 10
7 6 12

最常见的(x, y)价值是(1, 1).

我在这里尝试了一个专栏的答案.它适用于单个列,但不适用于两列的聚合.

> tail(names(sort(table(xy$x))), 1)
[1] "1"
> tail(names(sort(table(xy$x, xy$y))), 1)
NULL

如何在R中的数据框中的两列中检索最重复的(x,y)值？

编辑: …

我和这里的问题有同样的问题.

用户问:

我只是写了这个以返回最近的45度角.像0,45,90,135 ......

感觉必须有更好的方法来做到这一点.这工作正常,但看起来很乱.

    public function nearestDeg(degs:int):int {

        if (degs >= 0 && degs <= 45) {
            if (degs <= 23) {
                return 0;
            }else {
                return 45;
            }
        }

        if (degs > 45 && degs <= 90) {
            if (degs <= 68) {
                return 45;
            }else {
                return 90;
            }
        }

        if (degs > 90 && degs <= 135) {
            if (degs <= 113) {
                return 90;
            }else {
                return 135;
            }
        }

        if (degs > …