Как получить отчет о несоответствии столбцов, когда у меня есть два кадра данных, в котором второй кадр данных имеет больше столбца, чем первый

Question

У меня есть два фрейма данных:

a1 <- data.frame(a = 1:5, b=letters[1:5], c=c('a','t','f','e','v'))
a2 <- data.frame(a = 1:3, b=letters[1:3])

, которые я хочу сравнить и хочу получить количество несоответствий столбцов в обоих фреймах данных.

comparison <- compare(a2,a1,allowAll=TRUE)

Answer 1

Чтобы получить количество пропущенных столбцов:

length(c(setdiff(names(a1), names(a2)), setdiff(names(a2), names(a1))))
[1] 1

Чтобы получить имена:

c(setdiff(names(a1), names(a2)), setdiff(names(a2), names(a1)))
[1] "c"

Answer 2

Отчет о несоответствии столбцов. Появится список столбцов, недоступных во второй базе данных.

setdiff(colnames(a1),colnames(a2))

Answer 3

используйте метод dplyr, указанный ниже: -

require(dplyr) 
new <- anti_join(a1,a2)