我试图使用ggplot创建一个玩家数据的散点图,并弹出一个包含玩家姓名的弹出窗口.数据来自here.我的代码如下.

x <- Player_Stats %>%
  ggplot(aes(x=PTS, y=`ThreeP%`,color=Tm, text=paste("Player:", Player)))+
  geom_point()

ggplotly(x, tooltip = "text")

当我运行代码时,我收到一个错误,上面写着error in gsub("\n",br(),a,fixed=TRUE):

我当前的弹出菜单只包括PTS、3p%和团队.如何将玩家名称添加到弹出窗口?

推荐答案

我不确定是什么导致了您的错误,但我转到了您的数据源链接,并从"共享和导出"中 Select 了"将表格作为CSV(用于Excel)"选项.我突出显示了所有生成的表格文本,并复制到excel.然后我做了"文本到列"并用逗号分隔符分割数据.然后我将文件保存为.csv扩展.然后我运行了你的代码.最初它不起作用,因为ThreeP%变量在中被命名为3P%.csv文件.我将其重命名,然后您的代码在此之后运行良好,生成了所需的输出.也许你的代码很好,但输入的数据,不知怎么地不起作用?如果不精确地再现您的输入,很难说.

library(tidyverse)
library(plotly)

data <- read_csv("player_stats.csv")

colnames(data)
colnames(data)[14] <- "ThreeP%"

x <- data %>%
  ggplot(aes(x=PTS, y=`ThreeP%`, color=Tm, text=paste("Player:", Player)))+
  geom_point()

ggplotly(x, tooltip = "text")

Output

R相关问答推荐

在位置周围设定一个半径并识别该半径内的其他位置

如何计算前一行的值,直到达到标准?

如何利用模型函数在格图中添加双曲/指数曲线

如何使用STAT_SUMMARY向ggplot2中的密度图添加垂直线

移除仪表板Quarto中顶盖和车身之间的白色区域

根据元素和前一个值之间的差值过滤矩阵的元素

R:从geom_ol()中删除轮廓并导出为pdf

在不丢失空值的情况下取消列出嵌套列表

比较理论阿尔法和经验阿尔法

在R函数中使用加号

如何使用For-R循环在向量中找到一系列数字

在gggraph中显示来自不同数据帧的单个值

如何将这个小列表转换为数据帧?

如何提取R中其他字符串和数字之间的字符串?

计算Mean by分组和绑定到R中的数据集

图中显示错误 colored颜色 的图例geom_sf

R:改进实现简单模型

删除r中每个因素级别的最后2行

dmgr:使用最后一列的数据进行Mutations

向量化sApply函数