[R] Dense time series
rhelp10 at gmail.com
Mon Dec 7 01:49:55 CET 2015
Thank you for the reply.
I ran the code with your added code. The code itself works however I am
unable to see how the graphs actually plot because the plot area is so
small and it produces lots of separate graphs.
What I mean by dense is that some lines plot well, then there is a group
that looks like one clump, however the data is not clumped. I changed the
size to 0 but a few are still to dense.
You mentioned you can't see the photo I attached, should I resend?
On Sun, Dec 6, 2015 at 7:27 PM, William Dunlap <wdunlap at tibco.com> wrote:
> I cannot see either your data or your picture. Does the following dataset
> along with your ggplot command give a similar picture?
> TS <- data.frame(Well=paste0("Well",rep(1:21,each=3)),
> Date=as.POSIXct(paste(sep="-", 2015, 10, rep(c(11,18,25),21))),
> If so, then describe what you mean by 'dense'. I prefer finer lines,
> like those produced by geom_line(size=0), but I don't know if that
> is what you mean by dense..
> Bill Dunlap
> TIBCO Software
> wdunlap tibco.com
> On Sun, Dec 6, 2015 at 1:18 PM, DJ L <rhelp10 at gmail.com> wrote:
> > Hello R users!
> > Any idea why this looks so dense? Should be line graphs. Looks fine in
> > excel. The csv file is four columns, first date, second well number, 3
> > well location (ditch or interior), and then the last column is hydraulic
> > head. Thank you! I have attached a photo and the R code I am using.
> > setwd("c:/users/dot/desktop/r")
> > TS<-read.csv("TS_EAV1_SANDY.csv", header=TRUE,
> > sep=",",stringsAsFactors=FALSE)
> > # CHECK
> > head(TS)
> > str(TS)
> > #FORMAT DATE AND TIME
> > TS$Date <- as.POSIXct(TS$Date, tz = "", origin = "2012/10/22 0:00")
> > # CHECK
> > str(TS)
> > library(ggplot2)
> > library(scales)
> > #PLOT
> > xytheme <- theme(panel.background = element_blank(),
> > panel.grid.major.y = element_line(colour = "grey"),
> > panel.grid.minor.y = element_blank(),
> > panel.grid.major.x = element_line(colour = "grey"),
> > panel.grid.minor.x = element_blank(),
> > panel.border = element_rect(color = "black", fill = NA),
> > axis.text = element_text(color = "black", size =
> > legend.title = element_blank())
> > ###THIS ONE WORKS###
> > ggplot(TS, aes(Date, HYDRAULIC_HEAD.cm., group = Well)) +
> > facet_grid(LOCATION~.) +
> > geom_line(size=1) + xytheme +
> > labs(x = "EAV1",y = "Water Levels, cm")+
> > scale_x_datetime(breaks = date_breaks("2 days"), labels =
> > date_format("%m/%d/%y"))
> > ______________________________________________
> > R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
> > https://stat.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide
> > and provide commented, minimal, self-contained, reproducible code.
[[alternative HTML version deleted]]
More information about the R-help