fusionner 2 colonnes

Version imprimable

16/11/2013, 17h23
kami66

fusionner 2 colonnes

Bonjour,
je veux fusionner 2 colonnes "Date" et "Time", et avoir uniquement une seule colonne que j'appelle "Dates", voir l'exemple :

deux colonnes : "Date" et "Time" (séparées par ";")

Date;Time
09/09/2011;09:31:32
09/09/2011;09:46:32
09/09/2011;10:01:32
09/09/2011;10:16:32
10/09/2011;10:31:32
10/09/2011;10:46:32
10/09/2011;11:01:32
10/09/2011;11:16:32

le but est d'avoir une seule colonne avec le nom : "Dates" (="Date" + "Time"), comme ce résultat :

Dates
09/09/2011 09:31:32
09/09/2011 09:46:32
09/09/2011 10:01:32
09/09/2011 10:16:32
10/09/2011 10:31:32
10/09/2011 10:46:32
10/09/2011 11:01:32
10/09/2011 11:16:32

j'ai cherché mais je n'arrive pas à avoir ce résultat
merci d'avance pour votre aide

Une solution loin d'être propre mais qui fonctionne ;)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
> dd <- read.table('data', header=TRUE, sep=';')
# dd
#              Date     Time
# 1 09/09/2011 09:31:32
# 2 09/09/2011 09:46:32
# ...
xx <- data.frame(Date=1:nrow(dd)) 
for (i in 1:nrow(dd)) { xx[i,] <- paste(dd$Date[i], dd$Time[i], sep = ' ')}
# xx
#                Date
#1 09/09/2011 09:31:32
# 2 09/09/2011 09:46:32
# ...

16/11/2013, 18h35
kami66

Merci beaucoup ça marche, mais en fait mon travail est un peu plus compliqué :
En fait, j'ai ça :

3 colonnes :

Date;Time;Temperature
09/09/2011;09:31:32;16
09/09/2011;09:46:32;17
09/09/2011;10:01:32;17
09/09/2011;10:16:32;17
10/09/2011;10:31:32;18
10/09/2011;10:46:32;19
10/09/2011;11:01:32;18
10/09/2011;11:16:32;18

je veux le mettre comme ça : Dates(Date+Time);Temperature

Dates;Temperature

09/09/2011 09:31:32;16
09/09/2011 09:46:32;17
09/09/2011 10:01:32;17
09/09/2011 10:16:32;17
10/09/2011 10:31:32;18
10/09/2011 10:46:32;19
10/09/2011 11:01:32;18
10/09/2011 11:16:32;18

Merci une autre fois pour votre serviabilité.

Bonjour,
Citation:
Envoyé par mamounMob
Une solution loin d'être propre mais qui fonctionne ;)
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 > dd <- read.table('data', header=TRUE, sep=';') # dd # Date Time # 1 09/09/2011 09:31:32 # 2 09/09/2011 09:46:32 # ... xx <- data.frame(Date=1:nrow(dd)) for (i in 1:nrow(dd)) { xx[i,] <- paste(dd$Date[i], dd$Time[i], sep = ' ')} # xx # Date #1 09/09/2011 09:31:32 # 2 09/09/2011 09:46:32 # ...
Pas besoin de boucle for:

Code:

dd$Dates <- paste(dd$Date, dd$Time)

HTH

Vincent