Je l'ai vu de nombreuses méthodes afin d'obtenir le nombre ou pour trouver la valeur dans le vecteur ou même de nombreuses valeurs telles que: which(a %in% c(2,3))Trouver antivectorielle dans vecteur dans R
Mais le problème est que ne respecte pas l'ordre de mon vecteur [2 3], je cherche le vecteur mais pas tous les éléments séparément.
Avez-vous une solution s'il vous plaît?
Merci
Si toutes les valeurs dans votre vecteur sont à un seul chiffre, vous pouvez utiliser: gregexpr("23",paste0(a,collapse="")) pour retourner la position du 2 dans chaque séquence c (2,3).
Pour les cas simples, vous pouvez construire une matrice à 2 lignes et comparer chaque colonne avec votre vecteur de requête, puis trouver l'indice de colonne qui est vrai dans chaque ligne.
which(colSums(rbind(a[1:11],a[2:12]) == c(2,3)) == 2)
set.seed(0)
a <- sample(1:6,12000, TRUE)
b <- 2:4
vecIn <- function(a,b){
which(
Reduce('+', lapply(seq_along(y <- lapply(b, '==', a)), function(x){
y[[x]][x:(length(a) - length(b) +x)]
}
)
) == length(b)
)
}
> vecIn(a,b)
[1] 2 154 986 1037 1046 1257 1266 1750 2375 2677 3184 3206
[13] 3499 3526 3882 4238 4311 4388 4437 4580 4714 4766 4827 5046
[25] 5279 5629 6153 6842 6856 6919 7200 7516 7520 7707 7824 7859
[37] 8140 8191 8687 9208 9281 9313 10022 10320 10617 10720 10958 11179
[49] 11567 11591 11698 11811
library(zoo)
library(rbenchmark)
func1 <- function(a,b){
gregexpr(paste0(b,collapse=""),paste0(a,collapse=""))
}
func2 <- function(a,b){
which(rollapply(a, length(b), identical, b))
}
func3 <- vecIn
Quelques benchmarks
benchmark(func1(a,b), func2(a,b), func3(a,b))
test replications elapsed relative user.self sys.self user.child
1 func1(a, b) 100 0.673 5.904 0.680 0.000 0
2 func2(a, b) 100 28.808 252.702 28.198 0.672 0
3 func3(a, b) 100 0.114 1.000 0.116 0.000 0
sys.child
1 0
2 0
3 0
grep("2|3",paste(a,collapse="|")) Je pense que certains séparateurs comme "|" peut-être mieux pour une situation embarrassante
Pourriez-vous préciser ce que signifie «ne pas respecter la commande»? 'which()' renvoie les indici correspondants, qui sont dans l'ordre par la définition de vector. Deuxièmement, qu'est-ce que «a», valeur scalaire ou aussi vecteur? –
salut, si vous pouvez poster un exemple de 'a' (Et peut-être un exemple de ce que vous voulez que la sortie ressemble) qui serait utile pour comprendre la question –
Ok désolé,' a' est un vecteur comme ' sample (1: 6, 12, TRUE): [1] 3 6 6 2 3 2 6 3 5 4 5 2' et je cherche la séquence [2, 3] dans 'a' mais pas tous les 2 et tous les 3 – EntrustName