plotting list object using ggplot [closed]

Question

I'm running some simulations that I was wondering to plot the outcomes in a beautiful ggplot, but it seems that ggplot can't deal with list objects. Does anyone knows how to paste the results into ggplot chart?

   N <- 8619170         
   nn <- c(1000, 1200, 3000)
   p <- .27     
   nsim <- 100

    phat <- list()
    for (i in 1:length(nn)) {
    n <- nn[i]
    x <- rhyper(nsim, N * p, N * (1 - p), n)
    phat[[i]] <- x / n
    }

Ugly solution:

    names(phat) <- paste("n=", nn)
    stripchart(phat, method="stack")
    abline(v=p, lty=2, col="red")

Answer 1

ggplot2 need a data.frame as a source data. So you need to :

1. transform the data with reshape2 (or plyr or many other tools)

2. plot using qplot or ggplot

   e.g

    ## transform data
    require(reshape2)
    h <- do.call(cbind, phat)
    h.melt <- melt(h)
   
    ## rename variables so they look nicer on plots
    names(h.melt) <- c("test","N","value")     
   
    ## stripchart (not shown)
    qplot(data = h.melt, x = value,y = N,color=N)+geom_point()
   
    ## histogram (not shown)    
    ggplot(h.melt,aes(x=value,fill=N))+geom_histogram()+facet_grid(N~.)
   
    ## dotplot with rug (not shown)
    ggplot(h.melt,aes(x=value,fill=N))+geom_dotplot()+facet_grid(N~.)+geom_rug()  
   
    ##density plot with rug (shown below)
    ggplot(h.melt,aes(x=value,fill=N))+geom_density()+facet_grid(N~.)+geom_rug()