Comment concaténer les colonnes numériques de R?

J'ai trois colonnes de x, y et z les coordonnées d'un dataframe dans la R que je voudrais concaténer en un seul xyz valeur, comme ci-dessous. J'ai essayé de les "coller" avec "l'effondrement" de="", sep="", mais éprouve de la difficulté, je pense que c'est quelque chose à faire avec le texte vs variables numériques.

I have:
x y z 
1 2 3 
2 3 2 
3 1 4 
4 2 1 

I want:
x y z xyz
1 2 3 123
2 3 2 232
3 1 4 314
4 2 1 421

Il y a quelques très facile/moyen simple de le faire dans la R mais j'ai cherché sur Google et la recherche par le biais de Débordement de Pile de long en large depuis quelques jours et rien n'est venu à mon attention. Tout ce que je besoin est xyz colonne unique afin que je puisse courir à effets fixes régressions, (x varie de 1:4, y de 1:4 et z 1:10) j'ai donc 160 combinaisons possibles. Je suis actuellement à l'aide de différents exposants sur le x, y et z les valeurs et les multiplier pour obtenir des valeurs uniques--il y a certainement une meilleure façon! Grâce

OriginalL'auteur user3745597 | 2014-06-16

  1. 6

    Par exemple:

    transform(df,xyz=paste0(x,y,z))
  x y z xyz
1 1 2 3 123
2 2 3 2 232
3 3 1 4 314
4 4 2 1 421

    Ou à l'aide de interaction:

    transform(df,xyz=interaction(x,y,z,sep=''))
  x y z xyz
1 1 2 3 123
2 2 3 2 232
3 3 1 4 314
4 4 2 1 421

    `

    Merci! Je savais que c'était quelque chose de simple avec de la pâte que j'ai été absent.
    Ou, comme une généralisation, df$xyz <- do.call(paste0, df).

    OriginalL'auteur agstudy

  2. 4
    df$NewCol <- do.call(paste, c(df[c("x", "y", "z")], sep = ""))

    OriginalL'auteur Amarjeet

  3. 0

    Deux autres options pour combiner les colonnes sont dplyr::mutate() et tidyr::unite():

    df <- read.table(text = 'x y z 
                 1 2 3 
                 2 3 2 
                 3 1 4 
                 4 2 1', header = T)

library(dplyr)

df %>%
  mutate(xyz_char = paste0(x, y, z)) %>%           
  mutate(xyz_num = as.numeric(paste0(x, y, z)))

    Notez que l'utilisation de paste() convertit les valeurs numériques de caractère. Vous devez envelopper avec as.numeric() de garder le champ comme une valeur numérique, si c'est ce que vous avez besoin. 

    library(tidyr)

df %>% 
  unite(xyz, x:z, sep = '', remove = FALSE)

    L'argument par défaut dans tidy::unite() est remove = TRUE, qui tombe à l'origine des colonnes à partir de la trame de données.

    OriginalL'auteur sbha