Hello Arun, Thanks very much! In this way, it works! I convert both A and B to the same day of the month, and therefore there is no NA shown for different last business day and last calendar day of the month.
You are very help! Cheers, Rebecca -----Original Message----- From: arun [mailto:smartpink...@yahoo.com] Sent: Tuesday, January 22, 2013 5:06 PM To: Yuan, Rebecca Cc: R help Subject: Re: [R] plot two time series with different length and different starting point in one figure. HI Rebecca, Try this: dateA<-seq.Date(as.Date("28JAN2012",format="%d%B%Y"),as.Date("28DEC2012",format="%d%B%Y"),by="month") dateB<-seq.Date(as.Date("30JAN2012",format="%d%B%Y"),as.Date("30DEC2012",format="%d%B%Y"),by="month") set.seed(15) A<-data.frame(dateA,value=cumsum(sample(1:50,12,replace=TRUE))) set.seed(25) B<-data.frame(dateB,value=cumsum(sample(1:72,12,replace=TRUE))) B[,1]<-as.Date(gsub("\\d+$","28",B[,1])) B[,1][duplicated(B[,1],fromLast=TRUE)]<-as.Date(gsub("(.*-).*(-.*)","\\102\\2",B[,1][duplicated(B[,1],fromLast=TRUE)])) #this step may not be needed in ur data. In the month of march, there were two values library(xts) Anew<-as.xts(A[,-1],order.by=A[,1]) Bnew<-as.xts(B[,-1],order.by=B[,1]) res<-merge(Anew,Bnew) library(zoo) plot.zoo(res) A.K. ----- Original Message ----- From: "Yuan, Rebecca" <rebecca.y...@bankofamerica.com> To: 'arun' <smartpink...@yahoo.com> Cc: Sent: Tuesday, January 22, 2013 3:53 PM Subject: RE: [R] plot two time series with different length and different starting point in one figure. Hello Arun, I do not want to remove those NA values because they are the monthly data but recorded as the last calendar date in A and last business date in B. I tried to use raw_time <- substr(raw_time,3,9) raw_time <- as.Date(raw_time,format="%d%B%Y") to cutoff the date and leave the month and year in raw_time, and then convert it to a valid date type of data, but I failed. Is there a way that I can present 2012-09-28 NA NA 5400726 14861715970 2012-09-30 5035606 14832837436 NA NA into something like 2012-09-30 5035606 14832837436 5400726 14861715970 By converting 2012-09-28 to the last calendar date as of 2012-09-30 then B will be recorded at the last business date of the month, and will not have any NA values. Dput() gives me > dput(tail(res)) structure(c(121, NA, 111, 111, 120, 119, 309, NA, 313, 307, 30, 313, 130, 130, NA, 130, 130, 130, 309, 313, NA, 309, 310, 315), class = c("xts", "zoo"), .indexCLASS = "Date", .indexTZ = "", tclass = "Date", tzone = "", index = structure(c(134, 134, 134, 135, 135, 135), tzone = "", tclass = "Date"), .Dim = c(6L, 4L), .Dimnames = list(NULL, c("raw_acct", "raw_baln", "raw_acct.1", "raw_baln.1"))) Thanks very much! Cheers, Rebecca -----Original Message----- From: arun [mailto:smartpink...@yahoo.com] Sent: Tuesday, January 22, 2013 3:41 PM To: Yuan, Rebecca Cc: R help Subject: Re: [R] plot two time series with different length and different starting point in one figure. Hi Rebecca, In the previous email, res<-merge(Anew,Bnew) head(res) # Anew Bnew #2012-01-01 181 NA #2012-01-02 59 NA #2012-01-03 290 NA #2012-01-04 196 NA #2012-01-05 111 NA #2012-01-06 297 NA plot.zoo(res) # removes the NA values from Bnew.. (if NA was present in Anew, I guess, it would remove that from plotting) If you want to remove the NA rows: use, na.omit() or complete.cases()? #as I did in the previous email. Could you dput() an example dataset? A.K. ----- Original Message ----- From: "Yuan, Rebecca" <rebecca.y...@bankofamerica.com> To: 'arun' <smartpink...@yahoo.com> Cc: R help <r-help@r-project.org> Sent: Tuesday, January 22, 2013 2:38 PM Subject: RE: [R] plot two time series with different length and different starting point in one figure. Hello Arun, This would help me to get the date type of data. A new question comes out that since the dates are not exactly the same on two date sets, there are some NA values in the merged data set, such as 2012-09-28 NA NA 5400726 14861715970 2012-09-30 5035606 14832837436 NA NA Does R have a function to convert the date to some format of Sep,2012, therefore when I merge those two, they will not have those NA numbers... Thanks, Rebecca -----Original Message----- From: arun [mailto:smartpink...@yahoo.com] Sent: Tuesday, January 22, 2013 2:15 PM To: Yuan, Rebecca Cc: R help Subject: Re: [R] plot two time series with different length and different starting point in one figure. Hi Rebecca, Assuming that 'raw_data' is data.frame with first column as "raw_time: You could convert the raw_time to date format by as.Date("28FEB2002",format="%d%B%Y") #[1] "2002-02-28" In your data, it should be: raw_data$raw_time<- as.Date(raw_time,format="%d%B%Y") Could you just dput() a few lines of your dataset if this is not working? Tx. A.K. ----- Original Message ----- From: "Yuan, Rebecca" <rebecca.y...@bankofamerica.com> To: 'arun' <smartpink...@yahoo.com> Cc: Sent: Tuesday, January 22, 2013 2:08 PM Subject: RE: [R] plot two time series with different length and different starting point in one figure. Hello Arun, My data shows that I do not have a date type of data: summary(raw_data) raw_time raw_acct raw_baln 28FEB2002: 1 Min. : 61714 Min. :117079835 28FEB2003: 1 1st Qu.: 75587 1st Qu.:158035150 28FEB2005: 1 Median :100234 Median :206906298 28FEB2006: 1 Mean : 96058 Mean :210550369 28FEB2007: 1 3rd Qu.:116908 3rd Qu.:263623782 28FEB2009: 1 Max. :121853 Max. :325290870 (Other) :127 > How could I transfer the "raw_time" column to a date format, such as summary(dateA) Min. 1st Qu. Median Mean 3rd Qu. Max. "2012-01-01" "2012-04-01" "2012-07-01" "2012-07-01" "2012-09-30" "2012-12-31" Thanks very much! Cheers, Rebecca -----Original Message----- From: arun [mailto:smartpink...@yahoo.com] Sent: Tuesday, January 22, 2013 12:39 PM To: Yuan, Rebecca Cc: R help; Petr PIKAL Subject: Re: [R] plot two time series with different length and different starting point in one figure. Hi, You could also try this: dateA<-seq.Date(as.Date("1jan2012",format="%d%b%Y"),as.Date("31Dec2012",format="%d%b%Y"),by="day") dateB<-seq.Date(as.Date("1Mar2012",format="%d%b%Y"),as.Date("30Nov2012",format="%d%b%Y"),by="day") set.seed(15) A<-data.frame(dateA,value=sample(1:300,366,replace=TRUE)) set.seed(25) B<-data.frame(dateB,value=sample(1:300,275,replace=TRUE)) library(xts) Anew<-as.xts(A[,-1],order.by=A[,1]) Bnew<-as.xts(B[,-1],order.by=B[,1]) res<-merge(Anew,Bnew) res1<-res[complete.cases(res),] library(zoo) plot.zoo(res1) plot.zoo(res) A.K. ----- Original Message ----- From: "Yuan, Rebecca" <rebecca.y...@bankofamerica.com> To: 'PIKAL Petr' <petr.pi...@precheza.cz> Cc: R help <r-help@r-project.org> Sent: Tuesday, January 22, 2013 10:36 AM Subject: Re: [R] plot two time series with different length and different starting point in one figure. Hello Petr, As the time series have the same column names, I got the error message like: -------------------------------------------------------------------- > m1<-merge(A, B, by.x = "time", by.y = "balance") Error in fix.by(by.x, x) : 'by' must specify uniquely valid column(s) -------------------------------------------------------------------- To plot A and B in one plot is to compare the difference between them... Any other thoughts? Thanks, Rebecca -----Original Message----- From: PIKAL Petr [mailto:petr.pi...@precheza.cz] Sent: Tuesday, January 22, 2013 10:28 AM To: Yuan, Rebecca; R help Subject: RE: plot two time series with different length and different starting point in one figure. Hi > -----Original Message----- > From: r-help-boun...@r-project.org [mailto:r-help-bounces@r- > project.org] On Behalf Of Yuan, Rebecca > Sent: Tuesday, January 22, 2013 4:07 PM > To: R help > Subject: [R] plot two time series with different length and different > starting point in one figure. > > Hello, > > I do have two different time series A and B, they are different in > length and starting point. A starts in Jan, 2012 and ends in Dec, 2012 > and B starts in March, 2012 and ends in Nov, 2012. > > How can I plot those two series A and B in the same plot? I.E., from > Jan. 2012 - Feb, 2012, it would have one data point from A and from > Mar, 2012-Nov, 2012, it would have two data points from A and B, and > in December 2012, it would have one data point from A. Merge those 2 series. ?merge Regards Petr > > Thanks very much! > > Cheers, > > Rebecca > > > ---------------------------------------------------------------------- > This message, and any attachments, is for the > intended...{{dropped:13}} ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code. ---------------------------------------------------------------------- This message, and any attachments, is for the intended recipient(s) only, may contain information that is privileged, confidential and/or proprietary and subject to important terms and conditions available at http://www.bankofamerica.com/emaildisclaimer. If you are not the intended recipient, please delete this message. ---------------------------------------------------------------------- This message, and any attachments, is for the intended recipient(s) only, may contain information that is privileged, confidential and/or proprietary and subject to important terms and conditions available at http://www.bankofamerica.com/emaildisclaimer. If you are not the intended recipient, please delete this message. ---------------------------------------------------------------------- This message, and any attachments, is for the intended recipient(s) only, may contain information that is privileged, confidential and/or proprietary and subject to important terms and conditions available at http://www.bankofamerica.com/emaildisclaimer. If you are not the intended recipient, please delete this message. ---------------------------------------------------------------------- This message, and any attachments, is for the intended recipient(s) only, may contain information that is privileged, confidential and/or proprietary and subject to important terms and conditions available at http://www.bankofamerica.com/emaildisclaimer. If you are not the intended recipient, please delete this message. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.