Croisement de 2 dataframes
Bonjour,
Je suis en train de travailler sur 2 jeux de données.
Je cherche à croiser ces 2 jeux de données avec comme point commun les dates (une acquisition toutes les 15 minutes) or les 2 jeux ne sont pas calés sur les mêmes dates.
Je dois donc réussir à caler les 2 dataframes sur les mêmes dates afin de les croiser j'ai tenté les commandes suivantes sans succès car elles me ressortent des NA lors de la commande TMi et TMf.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
| DAMPS<- Données.nettoyées.Sambat.DAMPS.
DAMPS<- DAMPS2 <- DAMPS3 <- DAMPS[order(DAMPS[,1]),]
TDAMPS<-strptime(DAMPS[,1],"%Y-%m-%d %H:%M:%S")
TMi<-min(TDAMPS)
TMf<-max(TDAMPS)
TMiCont <-as.POSIXlt(round(as.double(TMi)/(15*60))*(15*60),origin=(as.POSIXlt('1970-01-01')))
TMfCont <-as.POSIXlt(round(as.double(TMf)/(15*60))*(15*60),origin=(as.POSIXlt('1970-01-01')))
TContDAMPS<-seq(TMiCont,TMfCont,by=900)
TDAMPS2<-as.POSIXlt(TDAMPS+(TMiCont-TDAMPS[1]))
TDAMPS3<-as.POSIXlt(round(as.double(TDAMPS2)/(15*60))*(15*60),origin=(as.POSIXlt('1970-01-01')))
DAMPS2[,1]<-as.character(TDAMPS2)
DAMPS3[,1]<-as.character(TDAMPS3)
TContDAMPS<-data.frame(SambatTime=as.character(TContDAMPS),stringsAsFactors=F)
DAMPS4<-merge(TContDAMPS,DAMPS3,by="SambatTime",all=T)
DAMPS5<-DAMPS4[which(duplicated(DAMPS4[,1])==F),] |
Le programme a-t-il un problème et si oui est-il possible de le résoudre ?
Bonne journée
Merci pour vos réponses