R: Plotting a Graph with NA's-CodePudding

The

This seemed to have worked, but produces a warning message stating that NA's were not plotted:

Warning messages: 1: Removed 64 row(s) containing missing values (geom_path). 2: Removed 64 rows containing missing values (geom_point).

Option 2:

Further formatting options can be found here

CodePudding user response：

Maybe try this. I suggest separating the individual IDs into single facets.

library(tidyverse) my_data <- tibble::as_tibble(my_data) my_data <- my_data %>% tidyr::pivot_longer(!c(id), names_to = "tp", values_to = "measure") my_data <- my_data %>% dplyr::mutate( tp = factor(tp, levels = c( "weight_time_1", "weight_time_2", "weight_time_3", "weight_time_4", "weight_time_5", "weight_time_6", "weight_time_7", "weight_time_8", "weight_time_9", "weight_time_10" )), id = factor(id) ) my_data %>% ggplot2::ggplot(aes(tp, measure, col = id, group = id)) ggplot2::geom_point() ggplot2::geom_line() ggplot2::theme(axis.text.x = element_text(angle = 90, vjust = .5, hjust = 1)) ggplot2::facet_wrap(~id)

CodePudding user response：

There are plenty of options to deal with NAs when plotting with ggplot2.

Just leave them, and accept the warning (really nothing wrong with that)

drop NA before plotting see JeffV's answer using tidyr::drop_na, but there are many ways, see this ultra-popular thread

in your case, you can drop NA when pivoting - use tidyr::pivot_longer(..., values_drop_na = TRUE)

add na.rm = TRUE to the geom of interest:

library(ggplot2) library(dplyr) library(tidyr) my_data %>% pivot_longer(cols = starts_with("weight")) %>% # your x is essentially continuous. Thus make it REALLY continuous! # your id is categorical, so make it that mutate(time = as.integer(gsub(".*([0-9] )", "\\1", name)), id = as.character(id)) %>% ggplot(aes(x=time, y=value, colour=id, group=id)) geom_line(alpha=.5, na.rm = TRUE)

^{Created on 2022-06-01 by the reprex package (v2.0.1)}