Помечать точки с агрегатной функцией на графике рассеяния в r - PullRequest
0 голосов
/ 06 июня 2018

Как добавить в приведенную ниже таблицу метки для группировки точек по: категории (KEY), которая превышает (>) среднее значение по категории + 2?

Мне только что удалось добавить метки к точкам(независимо от категории), которые превышают определенное значение (20).Ниже.

geom_text(aes(label=ifelse(PRODVENDA>20,as.character(Projeto),'')), 
            hjust=0,vjust=0, show.legend = FALSE

Я пытаюсь объединить агрегат функций, но не смог.Это возможно?

enter image description here

prodVenda_KEY <- ggplot(dfProjeto, aes(Projeto, PRODVENDA, group=KEY,color=KEY, shape=KEY)) + 
  geom_point(aes(colour = factor(dfProjeto$KEY)), size = 2.5) + 
  labs(title = "Sales productivity") + xlab('')+ ylab('') +
  theme_minimal() +
  theme(axis.title.x=element_blank(), axis.text.x=element_blank(), axis.ticks.x=element_blank()) +
  geom_text(aes(label=ifelse(PRODVENDA>20,as.character(Projeto),'')), 
            hjust=0,vjust=0, show.legend = FALSE)

Воспроизводимый пример моих данных:

Projeto    Key            PRODVENDA
(code)     (text)         (number productivity)
2020      Web-service     20
2074      Web-service     15
8787      XLS             12

Спасибо!

...