search for: clock24

Dear All, I am trying to generate a circular/radial plot. The script below has a result I am looking for: testlen<-rnorm(24)*2+5 testpos<-0:23+rnorm(24)/4 clock24.plot(testlen,testpos,main="Test Clock24 (lines)",show.grid=FALSE, line.col="green",lwd=3) if(dev.interactive()) par(ask=TRUE) # now do a 'daylight' plot oldpar<-clock24.plot(testlen[7:19],testpos[7:19], main="Test Clock24 daytime (symbols)", point.c...

Dear List, Following the link below ( http://rgm2.lab.nig.ac.jp/RGM2/func.php?rd_id=plotrix:clock24.plot) I got an interesting polar plots which displayed my data and the time of observation. Thank you very much for providing such details. However, I have two set of data which I wish to display in the same polar plot. I tried using points to add the second data but could not succeed. That is, a...

...4ae565c4280aa47.html On Fri, 22 Apr 2016 at 08:31 Ogbos Okike <giftedlife2014 at gmail.com> wrote: > Dear All, > I am trying to generate a circular/radial plot. The script below has a > result I am looking for: > testlen<-rnorm(24)*2+5 > testpos<-0:23+rnorm(24)/4 > clock24.plot(testlen,testpos,main="Test Clock24 (lines)",show.grid=FALSE, > line.col="green",lwd=3) > if(dev.interactive()) par(ask=TRUE) > # now do a 'daylight' plot > oldpar<-clock24.plot(testlen[7:19],testpos[7:19], > main="Test Clock24 daytime (...

...;- data.frame(datetime = events, eventhour = hour_of_event) # determine if event is in business hours eventdata$Workday <- eventdata$eventhour %in% seq(9, 17) library(circular) eventdata$eventhour <- circular(hour_of_event%%24, # convert to 24 hrs units="hours", template="clock24") rose.diag(eventdata$eventhour, bin = 24, col = "lightblue", main = "Events by Hour (sqrt scale)", prop = 3) I tried to run the above but got an error message: "Error in eval(expr, envir, enclos) : could not find function "days" I was thinking that if I...

...L Carlson Department of Anthropology Texas A&M University College Station, TX 77840-4352 -----Original Message----- From: R-help [mailto:r-help-bounces at r-project.org] On Behalf Of Ogbos Okike Sent: Friday, April 22, 2016 2:05 PM To: Ulrik Stervbo Cc: r-help at r-project.org Subject: Re: [R] clock24.plot/radial plot Kind Experts, Many thanks for your guide. I have tried to figure out something that can help me plot my own data using the examples you referred me to. I copied part of the code as: set.seed(44) N=500 events <- as.POSIXct("2011-01-01", tz="GMT") +...

Dear All, This problem is over. Clock24.plot did the job. Thanks to all those who assisted me. Ogbos On Apr 22, 2016 8:34 PM, "Ogbos Okike" <giftedlife2014 at gmail.com> wrote: > Dear All, > One hand. Many thanks!! The code run as soon as I loaded lubridate. > > Please can you guide me on how to relate this c...

Hi Ogbos, Here is your sample data plotted in roughly the same way as the image. You can get the hours to start at the bottom, but it will require more code. swe$hour<-as.numeric(sapply(strsplit(swe$time,":"),"[",1)) swe$FD<-sample(1:2,nrow(swe),TRUE) library(plotrix) clock24.plot(swe$count,swe$hour,rp.type="s",radial.lim=c(3000,4010), show.grid.labels=0,point.col=swe$FD,mar=c(2,2,6,2)) legend(0,1600,c("FD1","FD2"),pch=1,col=1:2,xjust=0.5,yjust=0.5, xpd=TRUE) Jim On Fri, Apr 22, 2016 at 3:01 PM, Ogbos Okike <giftedlife2014 at gmail.co...

Dear list, I am using the ?clock24.plot command in this excellent package to plot animal activity data. Does anyone know if both symbols and a line can be plotted on the same plot to show both raw data (symbols) and a line (describing a statistical model of the pattern) ? Or if more than one line etc can be plotted? Thanks Paul

I have been trying to visualize times of lowest tides, month by month. I have tide predictions with times either in unix time or a text format, and heights in feet or meters. I had been able to derive the clock times of each prediction. I would now like to graph this data with points showing heights as "r" and times as "theta", from 0000 to 2355. There is a seasonal

Greetings to you all. I have two datasets - Time and magnitude. For a particular location, the magnitude of the parameter varies with time. I wish to obtain a polar coordinate distribution of time (0-24h) and magnitudes so as to visualize how magnitude varies with different times of the day (e.g., morning, midnight hours). I have searched for "polar coordinates in R" but could not get

Hi, I'm looking for the way to make vector plot over a time line. This plot, similar to the "feather plot" in Matlab, is a line in which every thick (a time value) one vector is drawn with its length proportional to one variable (wind speed, for example) and its direction to another (wind direction, for example). Any ideas? Thanks, EKS -- ---------------------------- Eduardo

Dear r-helpers, I want to show that time is flowing CCW in the following: require(circular) len <- 8 labl <- as.character(c(0, 1, 1, 1, 0, 0, 1, 0)) r <- circular(2*pi* (rep(c(1, 3, 6), each = 200)/len + rnorm(600, 0, 0.025))) r.dens <- density(r, bw = 25, adjust = 4, kernel = 'vonmises') plot(r, shrink = 2.5, axes = FALSE, ticks = FALSE, pch = 1, col =

Hey, i'd like to compose a clock-like looking plot composed out of two circles, each showing the length of a period (to compare them). first, to do so, it looked the easiest by using pie(), just puting multiple pie-charts over each other. the problem is that once the second pie is drawn, it replaces the first one. does anybody know how to add a second, smaller pie over an existing one,

...[2]-xrange[1]) invisible(newrange[1]+(x-xrange[1])*mfac) } else { cat("Usage: rescale(x,newrange)\n") cat("\twhere x is a numeric object and newrange is the extent of the new range\n") } } # plots data as radial lines on a 24 hour "clockface" going clockwise clock24.star<-function(lengths,radial.pos,radial.range) { if(missing(radial.range)) radial.range<-range(radial.pos) npos<-length(radial.pos) newrange<-c(2.5*pi,0.5*pi) # rescale to a range of 0 to 2pi # starting at "12 o'clock" and going clockwise clock.radial.pos<-rescal...

...rom 0000 to > > 2355. There is a seasonal component: I am interested in displaying > > times of lowest tides in particular. > > Does this get you started? > > > library(plotrix) > > theta <- seq(0, 23.5, by=0.5) > r <- runif(length(theta), 5, 10) > > clock24.plot(r, theta, main="Polar Plot") > > or > > clock24.plot(r, theta, main="Polar Plot", rp.type="p") > > > efg > Stowers Institute for Medical Research > > > > ------------------------------ > > Message: 18 > Date: Tue, 1 May...