geom_dotplot непрерывная заливка с дискретным x

Question

Я могу заставить эту визуализацию работать с набором данных миль на галлон, но я не могу воссоздать их с моими собственными данными, и я в затруднении. Я пытаюсь воссоздать со своими данными, теряю категоризацию по оси x. Если я удалю «входную» группировку, это будет выглядеть хорошо, но я действительно хочу, чтобы точки были закрашены входными данными.

x <- structure(list(model = c(rep("MODEL_PRED_180", 5),rep("MODEL_PRED_280", 5)), 
     size = c(170L, 179L, 183L, 181L, 186L, 244L, 236L, 239L, 230L, 247L), 
     input = c(750.2, 673.2, 770, 970.2, 601.7, 750.2, 673.2, 770, 970.2, 601.7)), class = "data.frame", row.names = c(NA, -10L))

ggplot(x, aes(model, size, group = factor(input)))+
  geom_dotplot(aes(fill = input), binaxis = "y", stackdir = "center", binwidth = 0.5)

Я относительный R newb ie, поэтому любой совет будет оценен.

Обновление: Я подхожу ... Я не хочу, чтобы точки выделялись отдельными цветами, но изменение любой части следующего кода приводит к полной потере заливки заливки.

ggplot(x, aes(model, size, color = factor(input)))+
     geom_dotplot(aes(fill = input), binaxis = "y", stackdir = "center", binwidth = 2)

пример

Answer 1

Вы можете попробовать это:

ggplot(x, aes(factor(model), size, group = factor(model)))+
    geom_dotplot(aes(fill = input), binaxis = "y", stackdir = "center", binwidth = 0.5)

Update

I include this update, could be helpful.

ggplot(x, aes(model, size, fill = factor(input)))+
  geom_dotplot(binaxis = "y", stackdir = "center", binwidth = 2)+
  scale_fill_brewer(palette="Blues")

введите описание изображения здесь