Line break when no data in ggplot2

by

You’ll have to set group by setting a common value to those points you’d like to be connected. Here, you can set the first 4 values to say 1 and the last 2 to 2. And keep them as factors. That is,

df1$grp <- factor(rep(1:2, c(4,2)))
g <- ggplot(df1, aes(x=Date, y=Counts)) + geom_line(aes(group = grp)) + 
                     geom_point()

Edit: Once you have your data.frame loaded, you can use this code to automatically generate the grp column:

idx <- c(1, diff(df$Date))
i2 <- c(1,which(idx != 1), nrow(df)+1)
df1$grp <- rep(1:length(diff(i2)), diff(i2))

Note: It is important to add geom_point() as well because if the discontinuous range happens to be the LAST entry in the data.frame, it won’t be plotted (as there are not 2 points to connect the line). In this case, geom_point() will plot it.

As an example, I’ll generate a data with more gaps:

# get a test data
set.seed(1234)
df <- data.frame(Date=seq(as.POSIXct("05:00", format="%H:%M"), 
                as.POSIXct("23:00", format="%H:%M"), by="hours"))
df$Counts <- sample(19)
df <- df[-c(4,7,17,18),]

# generate the groups automatically and plot
idx <- c(1, diff(df$Date))
i2 <- c(1,which(idx != 1), nrow(df)+1)
df$grp <- rep(1:length(diff(i2)), diff(i2))
g <- ggplot(df, aes(x=Date, y=Counts)) + geom_line(aes(group = grp)) + 
            geom_point()
g

ggplot2_groups

Edit: For your NEW data (assuming it is df), 

df$t <- strptime(paste(df$Date, df$Time), format="%d/%m/%Y %H:%M:%S")

idx <- c(10, diff(df$t))
i2 <- c(1,which(idx != 10), nrow(df)+1)
df$grp <- rep(1:length(diff(i2)), diff(i2))

now plot with aes(x=t, ...).

More Related Contents:

  1. Show percent % instead of counts in charts of categorical variables
  2. ggplot2 line chart gives “geom_path: Each group consist of only one observation. Do you need to adjust the group aesthetic?”
  3. Construct a manual legend for a complicated plot
  4. Plot multiple lines in one graph [duplicate]
  5. Adding minor tick marks to the x axis in ggplot2 (with no labels)
  6. Reduce PDF file size of plots by filtering hidden objects
  7. ggplot2 heatmap with colors for ranged values
  8. Explain ggplot2 warning: “Removed k rows containing missing values”
  9. Combining Bar and Line chart (double axis) in ggplot2
  10. ggplot side by side geom_bar()
  11. Understanding dates and plotting a histogram with ggplot2 in R
  12. R: ggplot2, can I set the plot title to wrap around and shrink the text to fit the plot?
  13. ggplot – Multiple legends arrangement
  14. ggplot2 shade area under density curve by group
  15. How to add frequency count labels to the bars in a bar graph using ggplot2? [duplicate]
  16. How to italicize part (one or two words) of an axis title
  17. Group data and plot multiple lines
  18. How to add multiple captions in ggplot2 outside of the main graph area
  19. Add secondary X axis labels to ggplot with one X axis
  20. if else condition in ggplot to add an extra layer
  21. Change the default colour palette in ggplot
  22. Combining `expression()` with `\n`
  23. Remove facet_wrap labels completely
  24. How to label a barplot bar with positive and negative bars with ggplot2
  25. ggplot2: Fix colors to factor levels
  26. How to automatically adjust the width of each facet for facet_wrap?
  27. Is it possible to jitter two ggplot geoms in the same way?
  28. Draw lines between different elements in a stacked bar plot
  29. What does the error “arguments imply differing number of rows: x, y” mean?
  30. Change the position of the strip label in ggplot from the top to the bottom?

Leave a Comment