Thanks a lot this worked nice.
It it possible also in ggplot2 to add a small figure? Let's say that I want to
have somewhere in the plot the value of r printed.
How can I do that with ggplot 2?
Regards
Alex
--- On Tue, 5/10/11, Dennis Murphy <djmu...@gmail.com> wrote:
> From: Dennis Murphy <djmu...@gmail.com>
> Subject: Re: [R] ggplot2 and add circle
> To: "Alaios" <ala...@yahoo.com>
> Cc: R-help@r-project.org
> Date: Tuesday, May 10, 2011, 7:12 PM
> Hi:
>
> Here's one way:
>
> plot_shad <- function(d, r) {
> require('ggplot2')
> plotdata <- melt(d)
> names(plotdata)<-c('x','y','z')
> xc <- mean(range(plotdata$x))
> yc <- mean(range(plotdata$y))
> theta <- seq(-pi, pi, length = 200)
> circ <- data.frame(xv = xc + r *
> cos(theta),
>
> yv = yc + r * sin(theta))
> v <- ggplot(plotdata)
> print(v + geom_tile(aes(x = x, y = y,
> fill = z)) +
> geom_path(data =
> circ, aes(x = xv, y = yv), color = 'white',
> size = 1) +
> coord_equal()
> )
> }
>
> plot_shad(f, 10)
>
> HTH,
> Dennis
>
> On Tue, May 10, 2011 at 10:15 AM, Alaios <ala...@yahoo.com>
> wrote:
> > Here you are :)
> >
> >
> > plot_shad_f<-function(f){
> > library(ggplot2)
> > dev.new()
> > plotdata<-melt(f)
> > names(plotdata)<-c('x','y','z')
> > v<-ggplot(plotdata, aes(x, y, z = z))
> > print(v + geom_tile(aes(fill=z)))
> >
> > }
> >
> >
> > f<-matrix(data=seq(1:10000),nrow=100,ncol=100)
> > plot_shad_f(f)
> >
> >
> > I would like to add a circle at the middle of this
> region with a range of 10.
> >
> > Best Regards
> >
> > Alex
> >
> > --- On Tue, 5/10/11, Scott Chamberlain <scttchamberla...@gmail.com>
> wrote:
> >
> > From: Scott Chamberlain <scttchamberla...@gmail.com>
> > Subject: Re: [R] ggplot2 and add circle
> > To: "Alaios" <ala...@yahoo.com>
> > Cc: R-help@r-project.org
> > Date: Tuesday, May 10, 2011, 5:59 PM
> >
> >
> >
> > You should provide reproducible
> data in addition to your code.
> > S
> >
> >
> >
> >
> >
> > On Tuesday, May 10, 2011 at
> 11:54 AM, Alaios wrote:
> >
> > Dear all,
> > today I have writted the following code,
> > to plot the contents of some matrices I have
> >
> > plot_shad_f
> > function(f){
> > library(ggplot2)
> > dev.new()
> > plotdata<-melt(f)
> > names(plotdata)<-c('x','y','z')
> > v<-ggplot(plotdata, aes(x, y, z = z))
> > print(v + geom_tile(aes(fill=z)))
> > }
> >
> > I would like to ask your help add a small circle in
> this plotting. What would be the easiest way to do that in
> ggplot2?
> >
> > Best Regards
> > Alex
> >
> > ______________________________________________
> > R-help@r-project.org
> mailing list
> > 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
> > 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.
> >
> >
>
______________________________________________
R-help@r-project.org mailing list
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.
