Как я могу обрезать записи на горизонтальной гистограмме ggplot, которая не представляет какие-либо бары? Пожалуйста, найдите изображение ниже.
Это мой текущий код. Данные в кадре данных df5 представляют Group.1 = конечную точку API и x = количество запросов.
df3 <- order(df2$num_requests, decreasing = T)
df2 <- df2[df3,]
df4 <- data.frame(df2$api_endpoint, df2$num_requests, df2$avg_latency)
df5 <- aggregate(df2$num_requests,list(df2$api_endpoint), mean)
ggplot(data = df5,
aes(x = reorder(df5$Group.1,df5$x), y = df5$x)) +
geom_bar(stat = "identity")+
xlab("No of requests")+
ylab("API Endpoints")+
ggtitle("Top API endpoints based on the number of request")+
coord_flip()
Я хотел бы оптимизировать свой код и сделать его более эстетичным, например:
- добавить дополнительные интервалы к именам осей x и y
- цвет гистограммы
- указывает на 5 верхних полос другого цвета, которые имеют наибольшее значение
- указывает правильные числа на оси х