There is an enhanced pretty function called nice in the Epi package
that also works with log data. Not sure if this could lead to any
simplifications in this problem?
On 7/6/05, Marc Schwartz [EMAIL PROTECTED] wrote:
I thought that I would take a stab at this. I should note however that
my
Thanks to all who replied, particularly Duncan Murdoch, whose solution I
adopted.
It thought it might be of interest to some to see the results and
compare these ways
of representing the distribution of historical events over time.
The events are the items I record on my site, Milestones in the
Michael Friendly wrote:
Thanks to all who replied, particularly Duncan Murdoch, whose solution I
adopted.
It thought it might be of interest to some to see the results and
compare these ways
of representing the distribution of historical events over time.
The events are the items I
Michael Friendly wrote:
Thanks to all who replied, particularly Duncan Murdoch, whose solution I
adopted.
It thought it might be of interest to some to see the results and
compare these ways
of representing the distribution of historical events over time.
The events are the items I
I'd like to do some plots of historical event data on a reverse log
scale, started, say at the year 2000 and going
backwards in time, with tick marks spaced according to log(2000-year).
For example, see:
http://euclid.psych.yorku.ca/SCS/Gallery/images/log-timeline.gif
As an example, I'd like
Do you want to move year 2000 to Inf? How about a cube root
transformation instead:
year - seq(0, 4000, 100)
y2000.3 - (sign(year-2000)*
abs(year-2000)^(1/3))
plot(y2000.3, year, axes=FALSE)
axis(1, y2000.3, year)
axis(2)
Of course, one should package the
On 7/6/2005 3:36 PM, Michael Friendly wrote:
I'd like to do some plots of historical event data on a reverse log
scale, started, say at the year 2000 and going
backwards in time, with tick marks spaced according to log(2000-year).
For example, see:
Thanks Duncan,
That is almost exactly what I want, except I want time to
go in the normal order, not backwards, so:
# plot on reverse log scale
years1500 - runif(500, 1500, 1990) # some fake data
x - -log(2000-years1500)
from - -log(2000-1990)
to - -log(2000-1500)
plot(density(x, from=from,
Michael Friendly wrote:
Thanks Duncan,
That is almost exactly what I want, except I want time to
go in the normal order, not backwards, so:
# plot on reverse log scale
years1500 - runif(500, 1500, 1990) # some fake data
x - -log(2000-years1500)
from - -log(2000-1990)
to -
Stupid me, I put my comment in the wrong place. Ignore my last message,
this one should be right:
Michael Friendly wrote:
Thanks Duncan,
That is almost exactly what I want, except I want time to
go in the normal order, not backwards, so:
# plot on reverse log scale
years1500 - runif(500,
Not sure if I am missing something essential here but it would
seem as simple as:
# data
set.seed(1)
x - runif(500, 1500, 1990)
# plot
d - density(x, from = 1500, to = 1990)
plot(d$y ~ d$x, log = x)
rug(x)
axis(1, seq(1500, 1990, 10), FALSE, tcl = -0.3)
On 7/6/05, Michael Friendly [EMAIL
I thought that I would take a stab at this. I should note however that
my solution is heavily biased by the first log scale plot that Michael
referenced below. To wit, my x axis has major ticks at powers of 10 and
minor ticks at 1/10 of each major tick interval.
Thus, here is my approach:
# Set
12 matches
Mail list logo