在R中比较两个矩阵是否相等

目录

方法一:使用all.equal()比较两个R对象是否近似相等

方法二:使用identical比较两个R对象是否精确相等。


方法一:使用all.equal()比较两个R对象是否近似相等

使用函数:all.equal(x,y) 比较两个R对象x和y是否近似相等

R 复制代码
> M1<-matrix(1:100,ncol=10)
> M1
      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
 [1,]    1   11   21   31   41   51   61   71   81    91
 [2,]    2   12   22   32   42   52   62   72   82    92
 [3,]    3   13   23   33   43   53   63   73   83    93
 [4,]    4   14   24   34   44   54   64   74   84    94
 [5,]    5   15   25   35   45   55   65   75   85    95
 [6,]    6   16   26   36   46   56   66   76   86    96
 [7,]    7   17   27   37   47   57   67   77   87    97
 [8,]    8   18   28   38   48   58   68   78   88    98
 [9,]    9   19   29   39   49   59   69   79   89    99
[10,]   10   20   30   40   50   60   70   80   90   100
> M2<-matrix(1:100,ncol=10)
> M2
      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
 [1,]    1   11   21   31   41   51   61   71   81    91
 [2,]    2   12   22   32   42   52   62   72   82    92
 [3,]    3   13   23   33   43   53   63   73   83    93
 [4,]    4   14   24   34   44   54   64   74   84    94
 [5,]    5   15   25   35   45   55   65   75   85    95
 [6,]    6   16   26   36   46   56   66   76   86    96
 [7,]    7   17   27   37   47   57   67   77   87    97
 [8,]    8   18   28   38   48   58   68   78   88    98
 [9,]    9   19   29   39   49   59   69   79   89    99
[10,]   10   20   30   40   50   60   70   80   90   100
> all.equal(M1,M2)
[1] TRUE

在帮助文件中的解释:

从帮助文件中的解释,我们可以知道all.equal(x,y)用于比较x与y是否近似相等。如果他们不同,会在某种程度上继续进行比较,并在console中返回差异报告。建议在if表达式中,不要直接使用all.equal函数,而是使用isTRUE(all.equal(...))或者使用identical()函数。

方法二:使用identical比较两个R对象是否精确相等。

identical(x,y)用于比较两个R对象是否完全相等(exactly equal)

identical()函数的帮助文件中的说明:

由此可知,测试两个对象是否完全相等的安全可靠的方法。在这种情况下返回TRUE,其他情况下返回FALSE。

R 复制代码
> M1<-matrix(1:100,ncol=10)
> M1
      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
 [1,]    1   11   21   31   41   51   61   71   81    91
 [2,]    2   12   22   32   42   52   62   72   82    92
 [3,]    3   13   23   33   43   53   63   73   83    93
 [4,]    4   14   24   34   44   54   64   74   84    94
 [5,]    5   15   25   35   45   55   65   75   85    95
 [6,]    6   16   26   36   46   56   66   76   86    96
 [7,]    7   17   27   37   47   57   67   77   87    97
 [8,]    8   18   28   38   48   58   68   78   88    98
 [9,]    9   19   29   39   49   59   69   79   89    99
[10,]   10   20   30   40   50   60   70   80   90   100
> M2<-matrix(1:100,ncol=10)
> M2
      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
 [1,]    1   11   21   31   41   51   61   71   81    91
 [2,]    2   12   22   32   42   52   62   72   82    92
 [3,]    3   13   23   33   43   53   63   73   83    93
 [4,]    4   14   24   34   44   54   64   74   84    94
 [5,]    5   15   25   35   45   55   65   75   85    95
 [6,]    6   16   26   36   46   56   66   76   86    96
 [7,]    7   17   27   37   47   57   67   77   87    97
 [8,]    8   18   28   38   48   58   68   78   88    98
 [9,]    9   19   29   39   49   59   69   79   89    99
[10,]   10   20   30   40   50   60   70   80   90   100
> identical(M1,M2)
[1] TRUE
> typeof(M1)
[1] "integer"
> typeof(M2)
[1] "integer"

注:使用identical()函数比较两个R对象是否完全相等时,如果不相等,要注意查看是否是数据类型不同,比如一个数据类型是double,一个数据类型是integer。

参考:

如何检查R中两个矩阵是否相等?-面圈网 (mianshigee.com) (介绍all.equal函数的相关示例)

如何在 R 中使用 identical() 函数 - 知乎 (zhihu.com) (介绍identical函数的相关示例)

相关推荐
WangYan20228 分钟前
【物种分布模型】R语言物种气候生态位动态量化与分布特征模拟——气候生态位动态检验、质心转移可视化、适生区预测等
r语言·物种分布模型·物种气候生态位
Suckerbin12 分钟前
LAMPSecurity: CTF5靶场渗透
笔记·安全·web安全·网络安全
小憩-1 小时前
【机器学习】吴恩达机器学习笔记
人工智能·笔记·机器学习
UQI-LIUWJ1 小时前
unsloth笔记:运行&微调 gemma
人工智能·笔记·深度学习
googleccsdn1 小时前
ESNP LAB 笔记:配置MPLS(Part4)
网络·笔记·网络协议
楚肽生物小敏1 小时前
Cy5-Tyramide, Cyanine 5 Tyramide;1431148-26-3
笔记
speop2 小时前
llm的一点学习笔记
笔记·学习
运维小雅2 小时前
哪些因素会直观地影响到产品销量?
经验分享·笔记·媒体
抓饼先生2 小时前
Linux control group笔记
linux·笔记·bash
搞一搞汽车电子3 小时前
S32K3平台eMIOS 应用说明
开发语言·驱动开发·笔记·单片机·嵌入式硬件·汽车