एक शब्द दो संभव विभाजक

Question

word:12335 
anotherword:2323434 
totallydifferentword/455 
word/32 

में से एक से पहले मैं केवल आधार आर कार्यों का उपयोग कर : या / से पहले चरित्र स्ट्रिंग हड़पने के लिए की जरूरत का पता लगाएं। मैं इसे stringr का उपयोग करके कर सकता हूं लेकिन मेरे पैकेज में एक और निर्भरता नहीं जोड़ना चाहता हूं। शब्दों में चरित्र की परिवर्तनीय संख्या हो सकती है लेकिन हमेशा विभाजक (एक) में समाप्त होती है। मुझे जो भी आता है उसे रखने की ज़रूरत नहीं है।

Answer 1

शायद कोशिश:

x <- c("word:12335", "anotherword:2323434", "totallydifferentword/455", "word/32") 
lapply(strsplit(x, ":|/"), function(z) z[[1]]) #as a list 
sapply(strsplit(x, ":|/"), function(z) z[[1]]) #as a string 

वह भी लेकिन अपने अनुभवों में इसी तरह की समस्याओं strsplit के साथ काम करेंगे कम वाक्पटु लेकिन तेजी से हो जाएगा gsub साथ regex समाधान कर रहे हैं।

मुझे लगता है इस regex के रूप में अच्छी तरह से काम करेगा:

gsub("([a-z]+)([/|:])([0-9]+)", "\\1", x) 

इस मामले gsub में था तेजी से:

Unit: microseconds 
     expr min  lq median  uq  max 
1  GSUB() 19.127 21.460 22.392 23.792 106.362 
2 STRSPLIT() 46.650 50.849 53.182 54.581 854.162 

Answer 2

This regex seems to work। क्या आप इसका उपयोग आर में कर सकते हैं?

Answer 3

कुछ इस तरह रूबी में http://rubular.com/r/PzVQVIpKPq

^(\w+)(?:[:\/]) 

चाल करना होगा

स्ट्रिंग के सामने से शुरू करना, किसी भी शब्द विशेषता को पकड़ो आरएस और उन्हें कैप्चर करें, जब तक कि आप गैर-कैप्चरिंग / या :