Mam kilka kolumn w ramce danych, które chcę wkleić razem (oddzielone przez „-”) w następujący sposób:

data <- data.frame('a' = 1:3, 
                   'b' = c('a','b','c'), 
                   'c' = c('d', 'e', 'f'), 
                   'd' = c('g', 'h', 'i'))
i.e.     
     a   b   c  d  
     1   a   d   g  
     2   b   e   h  
     3   c   f   i  

Które chcę zostać:

a x  
1 a-d-g  
2 b-e-h  
3 c-f-i  

Normalnie mogę to zrobić za pomocą:

within(data, x <- paste(b,c,d,sep='-'))

, a następnie usuwam stare kolumny, ale niestety nie znam konkretnie nazw kolumn, tylko zbiorcza nazwa wszystkich kolumn, np. Wiedziałbym, żecols <- c('b','c','d')

Czy ktoś zna sposób na zrobienie tego?