2015-01-19 9 views
7

को छोड़कर आर में स्ट्रिंग के अंत में वर्ण डालें, लेकिन मैंने देखा कि आर, में एक स्ट्रिंग वेक्टर में प्रत्येक तत्व के अंत में एक चरित्र को जोड़ने के लिए उत्तर देने में कोई असफल रहा एक ...अंतिम तत्व

निम्नलिखित पर विचार करें:

data <- c("cat", "dog", "mouse", "lion") 

मैं एक समारोह है कि चिपकाता लागू करना चाहते हैं एक "," प्रत्येक तत्व के अंत ऐसा है कि परिणाम है पर:

[1] "cat,", "dog,", "mouse,", "lion" 

कार्यों को लागू करें? पाश के लिए? किसी भी मदद की सराहना की है ...

+1

'paste0 (डेटा,", ")'। आपने 'शेर' जानबूझकर या नहीं के बाद '' 'जोड़ा नहीं है? –

+3

मुझे लगता है कि आपको 'डेटा [लम्बाई (डेटा)] <- paste0 (डेटा [-लम्बाई (डेटा)],', ')' या '' स्ट्रस्प्लिट (पेस्ट (डेटा, पतन = ','), '') [[1]] ' – akrun

+0

जानबूझकर, मैं जो कर रहा हूं वह एसक्यूएल में एक नकारात्मक चयन कथन हैक कर रहा है, इसलिए अंतिम आइटम में अल्पविराम @ डेविड एडनबर्ग – gh0strider18

उत्तर

9

आप कई तरीकों से में यह कर सकते हैं:

  1. सबसेट पिछले तत्व के बिना 'डेटा', , पेस्ट, और (मूल डेटा है कि आवंटित बिना पिछले तत्व)

    data[-length(data)] <- paste0(data[-length(data)], ',') 
    
  2. उपयोग strsplit एक स्ट्रिंग

    strsplit(paste(data, collapse=', '), ' ')[[1]]  
    
  3. के रूप में यह गिर के बाद
संबंधित मुद्दे