Hi,
Try this post:
http://r.789695.n4.nabble.com/Exporting-an-rgl-graph-tp1872712p1905113.html
HTH,
b.
On 22 June 2012 19:26, Rainer M Krug r.m.k...@gmail.com wrote:
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
Hi
Just to be sure: I couldn't find a way of creating an interactive 3d
Hi,
Here's one approach:
plot_one - function(d){
with(d, plot(Xvar, Yvar, t=n)) # set limits
with(d[d$param1 == 0,], lines(Xvar, Yvar, lty=1)) # first line
with(d[d$param1 == 1,], lines(Xvar, Yvar, lty=2)) # second line
}
par(mfrow=c(2,2))
plyr::d_ply(data, Subject, plot_one)
HTH,
b.
Try this alternative solution using only base functions:
# split the data into 4 data.frames
l - split(data, data$Subject)
names(l)
# set up the graph parameters
par(mfrow=n2mfrow(length(l)), mar=c(4,4,1,1), mgp = c(2, 1, 0))
# good old for loop over the subject names
for( n in names(l)){
d -
You can use main = unique(d$Subject) to solve this problem.
HTH,
b.
On 27 June 2012 08:49, Marcel Curlin cemar...@u.washington.edu wrote:
Well at this point I have what I need (rough plot for data exploration) but
the simplicity of the first approach is quite elegant and it has become a
Looking at these, and in retrospect, if I were writing a manuscript of
the pre-digital age, I would definitely add a burning mark as a
finishing touch to complete the work. Perhaps waving the parchment
above a burning candle.
With modern digital support, you can fake a similar result using e.g.
Hi,
You can use a grob instead of a text string, e.g
main = textGrob(Title goes here, gp=gpar(fontsize=24))
HTH,
b.
On 7 August 2012 03:49, Alastair alastair.and...@gmail.com wrote:
Hi,
I'm using the gridExtra package to combine some graphs like in the
arrangeGrob example. Each of the
Hi,
On 9 August 2012 08:40, li li hannah@gmail.com wrote:
Dear all,
I have a few extra questions regarding this. Below is my code.
My questions are:
(1), How can I remove the labels, tick marks and numbers, and the word
density for the histgrams.
(2) On the top right corner, there
Dear list,
I'm trying to visualise some ellipsoidal shapes in 3D. Their position,
axes, and angular orientation can be arbitrary. I saw an ellipse3d
function in rgl; however it is heavily oriented towards the
statistical concept of ellipse of confidence, whilst I am just
concerned with the
), ncol=3)
sizes - matrix(runif(3*N, 0.01, 0.05), ncol=3)
angles - matrix(runif(3*N, 0, 2*pi), ncol=3)
system.time(rgl.ellipsoids2(positions, sizes, angles, col= 1:N))
Best regards,
baptiste
On 1 February 2011 06:16, Ben Bolker bbol...@gmail.com wrote:
baptiste auguie baptiste.auguie
Hi,
It's a piece of cake with ggplot,
d - read.table(textConnection(id x y
1 10 500
1 15 300
1 23 215
1 34 200
2 5400
2 13 340
2 15 210
3 10 200
3 12 150
3 16 30), head=TRUE)
str(d)
library(ggplot2)
p -
ggplot(d) +
geom_path(aes(x,y, group=id))
p ## grouping
Hi,
rasterImage may alleviate the pdf artefacts in the viewer. This seems
to produce a similar output,
plot(range(x),range(y), t=n)
rasterImage(t(rgb(colorRamp(heat.colors(7))(z/max(z))/255)),
min(x),min(y),max(x),max(y), interpolate=FALSE)
HTH,
baptiste
On 16 February 2011 05:43, Steven
Hi,
You could use car::recode to change the levels of the factors,
library(car)
transform(x, locus1 = recode(locus1, 'A' = 'A/A' ; else = 'T/T'),
locus2 = recode(locus2, 'T'='T/T' ; 'C' = 'C/C'),
locus3 = recode(locus3, 'C'='C/C' ; 'G' = 'G/G'))
HTH,
Hi,
You could add arrows with geom_segment; however if you want even
spacing along the path it might get tricky,
library(ggplot2)
d - data.frame(x=seq(0, 10, length=100),
y=sin(seq(0, 10, length=100)))
N - 10
dN - 2
ind - seq(1,nrow(d),by=N)
ind - ind[-c(1,length(ind))]
d3 -
Hi,
I think the easiest way is to use grid graphics,
library(grid)
a = 0.3
b = pi
e = bquote(y[alpha] == .(a) * x[beta]+ .(round(b,2)))
grid.newpage()
grid.text(e)
## if you wanted a snug fit with the device window
e2 = expression(integral(frac(1, alpha + x[beta])*dx, -infinity, +infinity))
Dear list,
Reading the help page for ?switch didn't give me more than a hint at
what's going on here,
x = 5
y = 2
foo - function(a=x){
switch(a, x = x,
y = y)
}
foo(factor('x', levels=c('y', 'x')))
# 2
It seems that switch, when given a factor, uses the numeric
as.integer( factor('x', levels=c('y', 'x')) )
[1] 2
from the coerced to integer part? Therefore the second statement (y) is
evaluated regardless of the label (y=).
Allan
On 09/03/11 02:02, baptiste auguie wrote:
Dear list,
Reading the help page for ?switch didn't give me more than a hint
library(plyr)
adply(my.array,1:3)
HTH,
baptiste
On 20 April 2012 08:46, Emmanuel Levy emmanuel.l...@gmail.com wrote:
Hi,
I have a three dimensional array, e.g.,
my.array = array(0, dim=c(2,3,4), dimnames=list( d1=c(A1,A2),
d2=c(B1,B2,B3), d3=c(C1,C2,C3,C4)) )
what I would like to get is
Hi,
On 24 April 2012 05:00, Duncan Murdoch murdoch.dun...@gmail.com wrote:
On 23/04/2012 10:49 AM, Adam Wilson wrote:
I routinely write graphics into multi-page PDFs, but some graphics (i.e.
plots of large spatial datasets using levelplot()) can result in enormous
files. I'm curious if
Hi,
try also grid.table() in gridExtra
b.
On 27 April 2012 01:26, statquant2 statqu...@gmail.com wrote:
Hello,
I would like to be able to plot an array on a plot, something like:
|arg1 | arg2 | arg3
val1| 0.9 | 1.1 | 2.4
val2| 0.33 | 0.23 | -1.4
val3| hello| stop | test
I
For better typography, try tikzDevice, it uses LaTeX to render the text.
b.
On 16 May 2012 07:23, Fisher Dennis fis...@plessthan.com wrote:
David
You missed the point -- the issue was not the spacing between WORDS. It was
the spacing between LETTERS (as noted in the original email)
Other
Your log10(HCO3 and sqrt(HCO3 seem to be missing closing brackets.
HTH,
baptiste
On 18 May 2012 11:34, Rich Shepard rshep...@appl-ecosys.com wrote:
One of many scripts to produce 4 lattice plots on one page keeps throwing
an error. I've tried manipulating the file to eliminate the error, but
Try this,
bquote(.(L1) * .(L2))
HTH,
b.
On 19 May 2012 16:17, Rolf Turner rolf.tur...@xtra.co.nz wrote:
In the context in which I am actually working it is necessary for
me to build parts of a text string to place on a plot in two separate
stages.
The following toy example illustrates
You can rotate the viewport to flip around the horizontal axis,
library(grid)
grid.text(Chiral)
grid.text(Chiral, vp=viewport(angle=180, y=unit(0.5,npc)-unit(1,line)))
HTH,
b.
On 23 May 2012 05:34, Thomas Zumbrunn t.zumbr...@unibas.ch wrote:
Maybe my question was not concise enough. I was
Oops, sent too early; this obviously just a rotation, not a mirror
image. It illustrates the problem though ;)
b.
On 23 May 2012 07:32, baptiste auguie baptiste.aug...@googlemail.com wrote:
You can rotate the viewport to flip around the horizontal axis,
library(grid)
grid.text(Chiral
701 - 724 of 724 matches
Mail list logo
