Почему моя ось + разрывы легенды и метки отображаются по-разному для каждого набора данных

Question

Мои данные содержатся в книге Excel и для каждого листа (~30+) я пытаюсь создать график, подобный приведенному ниже.

Я использую Rstudio и импортирую один лист, затем запускаю код и сохраняю график, затем загружаю следующий лист и повторяю.

Мои разрывы по оси Y не отображаются одинаково на каждом отдельном графике, в некоторых метка "show" не отображается, а в других - отображается.

Что касается разрывов легенды, длительности отличаются для каждого отдельного графика, и я хотел бы установить равномерную легенду, но не могу установить разрывы

    #cbbPalette <- c("#000000", "#E69F00", "#56B4E9", "#009E73", "#F0E442", "#0072B2", "#D55E00", "#CC79A7")

ggplot(data = Consolidated_Cadiz_prestartGB_p01, aes(x=Fix8, y=AOI, color = Duration)) +
  geom_point(alpha=0.5) +
  scale_colour_gradientn(colours = rainbow(10) ) +
  #scale_colour_manual(values=cbbPalette) + ----- not working
  geom_line(color = "grey") +
  xlab("Fixation number") +
  ylab("Area of interest") +
  labs(colour = "Duration (ms)") +
  # "show" label isnt appearing on all graphs
  scale_y_continuous(breaks = c(1:23, 25),
                     labels = c("show", "Bow", "Mast", "Boom", "Control lines", "Watch", "Wind indicator", "Sail", "Window", "Tell-tales", "Laser other", "Opponent", "Stern-opponent", "Sea", "Sea2", "Stern-sea", "Stern-sea2", "Non-laser boat", "Sky", "Other", "Coaches boat", "Pin buoy", "Committee boat buoy", "No cursor")) +
  #scale_shape_discrete(breaks=c(99, 500, 1000, 1500, 2000),
                       #labels=c("100", "500", "1000", "1500", "2000+")) + --not working
    theme(panel.grid.major = element_blank(),
        panel.grid.minor = element_blank(), 
        panel.background = element_blank(),
        axis.line = element_line(colour = "black")
  )

РЕДАКТИРОВАТЬ:

> dput(head(Consolidated_Cadiz_prestartGB_p01))
structure(list(Fix8 = c(1, 2, 3, 4, 5, 6), AOIcode = c("sea2", 
"pinBuoy", "sea", "pinBuoy", "noCursor", "controlLines"), Duration = c(100, 
198, 563, 1059, 166, 298), AOI = c(15, 22, 14, 22, 25, 5)), .Names = c("Fix8", 
"AOIcode", "Duration", "AOI"), row.names = c(NA, -6L), class = c("tbl_df", 
"tbl", "data.frame"))

РЕДАКТИРОВАТЬ 2: проблема оси Y решена, теперь нужно установить легенду