expression régulière à l'exclusion de mot dans la R

Je ne sais pas vraiment comment bien trouver des mots à l'aide de non-correspondance d'expression régulière dans la R

Par exemple: les données incluent:

x =  c("hail", "small hail", "wind hail",  "deep hail",  "thunderstorm hail", "tstm wind hail", "gusty wind hail", "late season hail", "non severe hail", "marine hail")

Je veux trouver tous les obs avoir "grêle", mais n'avoir "marine"

Ma tentative:

x[grep("[^(marine)] hail", x)]

-> je n'ai que 5:

"small hail"      "wind hail"       "deep hail"       "tstm wind hail"  "gusty wind hail"

Je ne sais pas ce qui se passe avec les 4 autres

x[grepl("hail", x) & !grepl("marine", x)] pourrait être plus intuitive
Vous êtes le meilleur, Richard. Très intuitif

OriginalL'auteur Duy Bui | 2015-01-16

  1. 15

    Utilisation lookaround affirmations.

    > x =  c("hail", "small hail", "wind hail",  "deep hail",  "thunderstorm hail", "tstm wind hail", "gusty wind hail", "late season hail", "non severe hail", "marine hail")
> x[grep("^(?=.*hail)(?!.*marine)", x, perl=TRUE)]
[1] "hail"              "small hail"        "wind hail"        
[4] "deep hail"         "thunderstorm hail" "tstm wind hail"   
[7] "gusty wind hail"   "late season hail"  "non severe hail"

    OU

    Ajouter \b limites si nécessaire. \b correspondances entre un mot de caractères et un caractère non alphabétique.

    > x[grep("^(?=.*\\bhail\\b)(?!.*\\bmarine\\b)", x, perl=TRUE)]

    • ^ Affirme que nous sommes au début.

    • (?=.*hail) Anticipation positif qui affirme que le match doit contenir la chaîne hail

    • (?!.*marine) Anticipation négatif, qui affirme que le match ne contiennent pas la chaîne marine.

    • De sorte que la regex corresponde à l'ancrage de départ ou au début de la ligne seulement si les deux conditions sont remplies.

    Ce qui est excellent. Je vous remercie beaucoup. Je voudrais vous donner un pouce vers le haut, mais je ne suis pas autorisé à le faire.

    OriginalL'auteur Avinash Raj

  2. 7

    Vous souhaitez utiliser une anticipation de l'assertion dans cette circonstance. L'implémentation actuelle de votre nié le caractère de classe de ne pas faire ce que vous attendez, au contraire, il correspond à ce qui suit:

    [^(marine)]  # any character except: '(', 'm', 'a', 'r', 'i', 'n', 'e', ')'
 hail        # ' hail'

    Pour résoudre ce problème, vous pouvez simplement faire:

    > x[grep('^(?!.*marine).*hail', x, perl=TRUE)]
# [1] "hail"              "small hail"        "wind hail"        
# [4] "deep hail"         "thunderstorm hail" "tstm wind hail"   
# [7] "gusty wind hail"   "late season hail"  "non severe hail"
    Vous devez être bon avec les regex de répondre à partir de votre téléphone et de ne pas pouvoir tester le résultat.

    OriginalL'auteur hwnd

  3. 5

    Si tous x inclut uniquement les types de hail, puis:

    x[-grep("marine", x)]

    Devrait fonctionner parfaitement.

    Edit: Par G. Grothendieck suggestion: 

     x[ ! grepl("marine", x) ]

    est une meilleure solution.

    Qui ne fonctionne que s'il y a au moins un composant avec "marine". Essayez x[ ! grepl("marine", x) ] à la place.
    Puisqu'il n'y a "marine" dans les données de l'exemple que j'ai pris pour acquis qu'il serait là, mais, vous avez raison. Ma réponse est édité. Je vous remercie.

    OriginalL'auteur Andrew Taylor

  4. 1

    Ce que votre tentative, x[grep("[^(marine)] hail", x)], n'est-il cherche hail précédée par n'importe quel caractère sauf m,a,r,i,n,e . Pour ceux qui sont exclus, la dernière lettre du mot précédent hail est l'un de ces six.

    OriginalL'auteur user1207177