如何在R中的2个栅格之间找到kappa值？

Question

我在R中有两个栅格：

raster1
class      : RasterLayer 
dimensions : 47, 89, 4183  (nrow, ncol, ncell)
resolution : 0.5, 0.5  (x, y)
extent     : 60.75, 105.25, 15.75, 39.25  (xmin, xmax, ymin, ymax)
crs        : NA 
source     : memory
names      : gc
values     : 1.149215e-11, 17.5783  (min, max)

> raster2
class      : RasterLayer 
dimensions : 47, 89, 4183  (nrow, ncol, ncell)
resolution : 0.5, 0.5  (x, y)
extent     : 60.75, 105.25, 15.75, 39.25  (xmin, xmax, ymin, ymax)
crs        : NA 
source     : C:/XXX
names      : gc2 
values     : 0, 22.552  (min, max)

如何计算R中这两个栅格之间的kapp统计量？