您可以使用compareDF包。要比较的两个嵌套框必须具有相同的列结构。

library(compareDF)

df1 <- iris[1:5, ]
df1$Species <- as.character(df1$Species) # "unfactor"
df2 <- df1
df2[1, 1] <-10
df2[2, 5] <- "tulip"

# create comparison object
comp <- compare_df(df1, df2)

# visualize it in a "git diff" style
create_output_table(comp)

# wide format
create_wide_output(comp)
#   rowname Species_old Species_new Sepal.Width_old Sepal.Width_new
# 1       1      setosa      setosa             3.5             3.5
# 2       2       tulip      setosa             3.0             3.0
#   Sepal.Length_old Sepal.Length_new Petal.Width_old Petal.Width_new
# 1             10.0              5.1             0.2             0.2
# 2              4.9              4.9             0.2             0.2
#   Petal.Length_old Petal.Length_new
# 1              1.4              1.4
# 2              1.4              1.4

您还可以使用dataCompareR包（请参阅小插图）。