我有一组产品得分,我想在分散的情况下可视化.我要做的是把标签拉到图表的四个不同的角上.事实上,我有30-40个空间,这就是为什么我使用Ggrepel作为标签.
`
library(ggplot2)
peer_score <- c(3.5, 3.5, 2, 2 )
mkt_score <- c(3.5, 2, 3.5, 2)
revenue <- sample(1:75, 4, replace = T)
prod_name <- c("Product 1", "Product 2", "Product 3", "Product 4")
df <- data.frame(prod_name, revenue, peer_score, mkt_score)
head(df)
ggplot(df, aes(peer_score, mkt_score)) +
geom_point(color = "blue", alpha=0.5) +
geom_label_repel(aes(label=prod_name)) +
geom_vline(xintercept=3, linetype="dashed", alpha = 0.9, colour = "dark grey") +
geom_hline(yintercept=3, linetype="dashed", alpha = 0.9, colour = "dark grey") +
xlim(1,5) +
ylim(1,5)
`
所以我想把"产品1"拉到右上角,把"产品2"拉到右下角,依此类推
我曾try 使用ndge_x或ndge_y,但这都会将标签发送到相同的方向.如有任何建议,我们不胜感激!