Thank you ! I run your code. It have a graph with time(date) on x-axis. Thank you very much! Well, Would you like to do me a favor again? Most of times, the x-axis time data is lasted about 3 months. They are too much. I must select some of them marking in x-axis,and they are must reasonable and human-readable. Now I have tried the "pretty " function, But as soon as I run it, the format of data changed to "numeric" ,I don't know what should I do. Is there exist other functions can get the same result?
Best Regards! Ivy Li（李琛） YMS in Production & Testing Semiconductor Manufactory International(ShangHai) Corporation #18 ZhangJiang Road, PuDong New Area, Shanghai, China Tel: 021-5080-2000 *11754 Email: [EMAIL PROTECTED] -----原始邮件----- 发件人: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 发送时间: 2004年10月19日 16:43 收件人: Ivy_Li 主题: Re: 答复: 答复: [R] How to draw x-axis time label. Hi Li chen, I mean you should run the code I sent you in my first email. It's here again: plot(x$x.name,as.character(x$y.name),pch=26) By running this you should have a graph with time(date) on x-axis. Give it a go? Let me know if it is not working. Huang Huan Internet [EMAIL PROTECTED] - 10/19/2004 02:18 AM To: Huan HUANG cc: Subject: 答复: 答复: [R] How to draw x-axis time label. Put *time* on x-axis? Like this: >plot(time(x$x.name),as.character(x$y.name),pch=26) but the x-axis is not real time , just some number. I forgot your question in your previous mail. :-) My chinese name is Li Chen hello! Best Regards! Ivy Li（李琛） YMS in Production & Testing Semiconductor Manufactory International(ShangHai) Corporation #18 ZhangJiang Road, PuDong New Area, Shanghai, China Tel: 021-5080-2000 *11754 Email: [EMAIL PROTECTED] -----原始邮件----- 发件人: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 发送时间: 2004年10月18日 18:35 收件人: Ivy_Li 主题: Re: 答复: [R] How to draw x-axis time label. Come on, Ivy. Did you try the line in my previous email? That will put *time* on x-axis. Give it a go? Internet [EMAIL PROTECTED] - 10/18/2004 10:24 AM To: Huan HUANG cc: Subject: 答复: [R] How to draw x-axis time label. Thank you ! I know the oddness number are time calulated since 1970, but i need them to be x-axis . What should I do ? Best Regards! Ivy Li（李琛） YMS in Production & Testing Semiconductor Manufactory International(ShangHai) Corporation #18 ZhangJiang Road, PuDong New Area, Shanghai, China Tel: 021-5080-2000 *11754 Email: [EMAIL PROTECTED] -----原始邮件----- 发件人: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 发送时间: 2004年10月18日 16:50 收件人: Ivy_Li 主题: Re: [R] How to draw x-axis time label. Hi Ivy (any chinese name?) I ran your codes. I found if I try: plot(x$x.name,as.character(x$y.name),pch=26,) It would put time as the x axis. The *odd* numbers showed in yoru graph as the moment are numbers of seconds of those dates since the beginning of 1970. Hope it helps. Huang Huan Internet [EMAIL PROTECTED]@stat.math.ethz.ch - 10/18/2004 07:26 AM Sent by: [EMAIL PROTECTED] To: r-help cc: Subject: [R] How to draw x-axis time label. Hi everybody, Could I consult one problem? It is about plot Now I do some analysis in plot . I need to draw a plot which x-axis is time . But when I run the funtion of plot . The x-label are very oddness number, such as the time is "2004-08-05 09:08:48", but the x-label is 1091800000. I don't know how to do . I have an example . Mybe It can explain my meaning clearly. Thank you for helping me! Time <- c("2004-08-05 09:08:48", "2004-08-13 20:53:38", "2004-08-14 13:57:23", "2004-08-12 16:17:41", "2004-08-12 16:15:27", "2004-08-11 21:38:24", "2004-08-12 14:28:41", "2004-08-18 18:04:47", "2004-08-13 15:23:14", "2004-08-14 02:36:33") Time <- as.POSIXlt(Time) x <- data.frame(main.name="AAA", fruit.name=rep(c("Apply","Watermelon"),each=5), x.name=Time, y.name=(1:10)) plot(as.numeric(x$x.name),as.character(x$y.name),pch=26,) fruit.class <- table(x$fruit.name) color.code <- c(611,552,656,121,451,481,28,652,32,550,90,401,150,12,520,8) for(j in 1:length(fruit.class)) { fruit <- names(fruit.class)[j] lines(smooth.spline(x[x$fruit.name==fruit, "x.name"], x[x$fruit.name==fruit, "y.name"],df=5), col=colors()[color.code[j]],lwd=5) } Best Regards! Ivy Li（李琛） YMS in Production & Testing Semiconductor Manufactory International(ShangHai) Corporation #18 ZhangJiang Road, PuDong New Area, Shanghai, China Tel: 021-5080-2000 *11754 Email: [EMAIL PROTECTED] ______________________________________________ [EMAIL PROTECTED] mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html ???????????????????????????????????????????????????? ???????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????? ????????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????????? ????????????????????????????????????????????????? ???????????????????????????????????????????????????? ????????????????????????????????????????????????? ?????????????????????????????????????????????????????????????????????????????????????????????? ????????????????????????????????????????????????????? ????????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????? ??????????????? ??????????????????????????????????????????????????????????? ????????????????????????????????????????????????????????? ???????????????????????????????????????????????????????????? ??????????????? ?? ??????????????????????????????????????????????????????? ?????????????????????????????????????????????? ???????????????????????????????????????????????????? ???????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????? ????????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????????? ????????????????????????????????????????????????? ???????????????????????????????????????????????????? ????????????????????????????????????????????????? ?????????????????????????????????????????????????????????????????????????????????????????????? ????????????????????????????????????????????????????? ????????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????? ??????????????? ??????????????????????????????????????????????????????????? ????????????????????????????????????????????????????????? ???????????????????????????????????????????????????????????? ??????????????? ?? ??????????????????????????????????????????????????????? ?????????????????????????????????????????????? ???????????????????????????????????????????????????? ???????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????? ????????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????????? ????????????????????????????????????????????????? ???????????????????????????????????????????????????? ????????????????????????????????????????????????? ?????????????????????????????????????????????????????????????????????????????????????????????? ????????????????????????????????????????????????????? ????????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????? ??????????????? ??????????????????????????????????????????????????????????? ????????????????????????????????????????????????????????? ???????????????????????????????????????????????????????????? ??????????????? ?? ??????????????????????????????????????????????????????? ?????????????????????????????????????????????? ______________________________________________ [EMAIL PROTECTED] mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
