首页 > 解决方案 > 对于许多数据点,如何在 R 中使绘图函数变得不那么滞后和更明显?

问题描述

目前,我有很多数据点,并且无法通过颜色区分。如何使颜色更易于区分,或者我是否必须制作散点图以外的图表才能更好地显示我的数据?此外,我的情节图非常滞后,有 40 条警告消息。如何制作一个不那么滞后且颜色更易区分的绘图图。我的 ggplot 没有这个滞后问题,但我不想使用 ggplot 因为我希望它是交互式的。

#ggplot function for graph
scatter_n <- function(new_data) {
  b <- ggplot(data = new_data, aes(x = current_votes, y = percent, color = candidate)) +
    geom_point() 
  return(b)
}

scatter_n(df3)

([![ggplot][1]][1]



# Plotly function for graph

scatter_b <- function(new_data) {
  c <- plot_ly(data = new_data, x = ~current_votes, y = ~percent, color = ~candidate, Type = "scatter", Mode = "markers") %>%
    layout(
      title = "Percentage of Votes for each candidate by population",
      xaxis = list(title = "Current Votes"),
      yaxis = list(title = "Percentage", ticksuffix = "%")
    )
  return(c)
}

绘图

标签: rggplot2plotly

解决方案


我不完全确定你想要代表什么。您的两个轴代表几乎相同的数据(投票),因此散点图可能不是最合适的可视化方式。用geom_col()在 x 轴上绘制候选人和在 y 轴上绘制投票数怎么样?如果要添加百分比,可以将其添加为geom_text()条形顶部的文本。

您还可以将 ggplot 图形转换为 plotly with ggplotly(),以保持交互


推荐阅读