Thank you very much, Jim. You help a lot! On Thu, Nov 7, 2019 at 2:09 PM Jim Lemon <drjimle...@gmail.com> wrote:
> That's not too hard: > > x11(width=7,height=5) > par(cex.axis=.8) > fin_month<-month > fin_month[fin_month>6]<-fin_month[fin_month>6]-12 > fin_month<-fin_month+6 > plot(fin_month~year,axes=FALSE,type="l", ylab="Month", xlab="Year", > main="Month of occurrence in year") > axis(1,at=seq(1981,2014,3)) > fin_months<-month.abb[c(7:12,1:6)] > axis(2,at=1:12,labels=month.abb[c(7:12,1:6)]) > library(plotrix) > boxed.labels(year,fin_month,month.abb[month],border=NA,cex=0.7) > > Jim > > On Thu, Nov 7, 2019 at 3:35 PM ani jaya <gaaa...@gmail.com> wrote: > > > > Dear Jim, > > > > Thank you very much for nice suggestion and figure there. But what I > need is the y axis start from let say 7 (July) and end at 6 (June). > > In those sense, I can said clearly that the occurrence, minima in this > case, is fall during winter season, because Jan and Dec close to each other. > > Actually everything is good, but I want to 'kill' my curiosity. > > > > year<-c(1981:2015) > > month<-c(3, 1, 12, 11, 2, 1, 12, 1, 2, 1, 12, 3, 2, 12, 2, 7, 2, 6, 2, > 1, 1, 12, 3, 12, 3, 12, 2, 2, 9, 2, 1, 4, 12, 3, 4) > > plot(month~year,xaxt="n", type="b", ylab="Month", xlab="Year") > > axis(1, at=1981:2015,cex.axis=.8) > > > > Best, > > Ani > > > > > > On Thu, Nov 7, 2019 at 12:15 PM Jim Lemon <drjimle...@gmail.com> wrote: > >> > >> Hi Ani, > >> There are a number of ways to modify this sort of plot. Here is one: > >> > >> x11(width=7,height=5) > >> par(cex.axis=.8) > >> plot(month~year,xaxt="n", type="l", ylab="Month", xlab="Year", > >> main="Month of occurrence in year") > >> axis(1,at=seq(1981,2014,3)) > >> library(plotrix) > >> boxed.labels(year,month,month.abb[month],border=NA,cex=0.7) > >> > >> Jim > >> > >> On Thu, Nov 7, 2019 at 1:24 PM ani jaya <gaaa...@gmail.com> wrote: > >> > > >> > Dear R-Help, > >> > > >> > I have 35 data that is month when the annual minima happened. So I > want to > >> > plot those data but the order of y axis is not from 1 to 12, but let > say > >> > start from 9,10,11,12,1,..8. The reason to do this is when 12 (Dec) > meet 1 > >> > (Jan) in the following year the graph is not quite good (for me). > >> > > >> > > >> > year<-c(1981:2015) > >> > month<-c(3, 1, 12, 11, 2, 1, 12, 1, 2, 1, 12, 3, 2, 12, 2, 7, 2, 6, > 2, 1, > >> > 1, 12, 3, 12, 3, 12, 2, 2, 9, 2, 1, 4, 12, 3, 4) > >> > plot(month~year,xaxt="n", type="b", ylab="Month", xlab="Year") > >> > axis(1, at=1986:2015,cex.axis=.8) > >> > > >> > > >> > Any lead or comment is appreciate. > >> > > >> > Best, Ani > >> > > >> > [[alternative HTML version deleted]] > >> > > >> > ______________________________________________ > >> > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see > >> > 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. > [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see 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.
