r - 对于许多数据点,如何在 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)
}
解决方案
我不完全确定你想要代表什么。您的两个轴代表几乎相同的数据(投票),因此散点图可能不是最合适的可视化方式。用geom_col()
在 x 轴上绘制候选人和在 y 轴上绘制投票数怎么样?如果要添加百分比,可以将其添加为geom_text()
条形顶部的文本。
您还可以将 ggplot 图形转换为 plotly with ggplotly()
,以保持交互
推荐阅读
- python - Python - gphoto2:如何捕捉佳能 5D Mark IV 的图像
- dart - 颤振检查cpu使用情况
- javascript - ajax多文件上传卡在laravel中的请求
- classification - 强制列成为 RandomForest 中的主要拆分列
- r - Opencpu POST 请求在 90 秒内超时
- angular - Angular:我可以为其模块提供私有服务吗?
- format - ui 路径网页抓取格式
- python - 主 Python 进程和与 ProcessPoolExecutor 的互连
- c# - ASP.NET Core HttpClient 仅接受本地主机的所有证书,否则行为正常
- python - Selenium 无法选择 iframe 的上下文(间歇性地)