Michael Kubovy wrote:
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,
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,
2 matches
Mail list logo