Extraktion mit Namen, wenn Namen sich wiederholen

Question

Ich stieß auf diese Herausforderung. Wie extrahiere ich, wenn es Wiederholungen in Namen gibt?

X <- 1:5 
names(X) <- c(letters[1:4], "a") 
X 
a b c d a 
1 2 3 4 5 
names(X) 
[1] "a" "b" "c" "d" "a" 

X["a"] 
a 
1 

Answer 1

zu extrahieren, wenn Wiederholung dort in names ist:

X[names(X) %in% "a"] 
# a a 
# 1 5 

Warum ist R wiederholenden Namen zu akzeptieren?

Beachten Sie, dass names eine generische Accessor-Funktion ist. Sie können eine names auf alles einstellen, es muss nicht wirklich einzigartig sein.

Answer 2

Andere Lösungen:

X[grepl("a", names(X))] 
X[names(X) == "a"] 

Auch im Allgemeinen ist es besser, einen eindeutigen Namen zu haben, so man sie ohne Verwirrung verweisen können. Der folgende Befehl erledigt das für Sie.

make.unique(names(X)) 
[1] "a" "b" "c" "d" "a.1" 

BTW die erste der Lösung, die ich oben, noch die Spalten alles, was a enthalten würde vorgeschlagen holen.