Forcefully color NAs when aes(color=NULL) or aes(...), ..., color="salmon") is provided and remove_nas=F

[matiasandina]

I believe that something like this:

ggplot(wombats, aes(x=frame, behaviour=behaviour, y=wombat)) + geom_ethogram(remove_nas = F)

Should return this

But the NAs should be forcefully colored in gray. Maybe this is one of the things that could be handled by setup_data #8 ?

[matiasandina]

I think we can do this here

ggethos/R/ggethos.R

Lines 108 to 110 in 2fd669c

	if (remove_nas) {
	data <- data[which(!is.na(data$behaviour)),]
	}

Something like

if (remove_nas) {
  ...
}
else{
data <- mutate(data, colour=ifelse(is.na(colour), "gray50", colour))
}