Interessanten Mengenvergleichs-Funktionen:
(A <- c(sort(sample(1:20, 9)),NA))
[1] 1 2 3 12 16 17 18 19 20 NA
(B <- c(sort(sample(3:23, 7)),NA))
[1] 8 10 15 16 18 21 22 NA
# alle Elemente aus A und B (KEINE Duplikate)
union(A, B)
[1] 1 2 3 12 16 17 18 19 20 NA 8 10 15 21 22
# alle Elemente die in A und in B vorkommen (Schnittmenge)
intersect(A, B)
[1] 16 18 NA
# Elemente in A, aber nicht in B vorkommen
setdiff(A, B)
[1] 1 2 3 12 17 19 20
# Elemente in B, aber nicht in A vorkommen
setdiff(B, A)
[1] 8 10 15 21 22
# Enthält A die gleichen Elemente wie B?
setequal(A, B)
[1] FALSE
Montag, 19. September 2011
Abonnieren
Kommentare zum Post (Atom)
Keine Kommentare:
Kommentar veröffentlichen