Question

我正在研究一个项目，试图弄清楚棒球WAR统计数据与球员薪水之间是否存在相关性。我有一个同时具有WAR和薪水的数据框。然后我去绘制它们，我不知道发生了什么，所以我想我可能在基础层面做错了什么。

this.is.war.2015 <- this.is.war %>%
  filter(year_ID == 2015)
this.sal.2015 <- this.is.war.2015 %>%
  select(salary)
this.war.2015 <- this.is.war.2015 %>%
  select(WAR)
this.sal.2015.2 <- this.sal.2015[2:3,]
this.war.2015.2 <- this.war.2015[2:3,]
plot(this.war.2015.2, this.sal.2015.2)

Answer 1

我尝试使用一些虚拟数据运行代码，并且它有效。请注意，您只绘制了两个点。

    library(dplyr)
    this.is.war <- data.frame(year_ID = c(2013,2014,2015,2015,2015),
                              salary = rnorm(n = 5,mean = 1000,sd = 200),
                              WAR = rnorm(n=5,mean = 6, sd = 2))


    this.is.war.2015 <- this.is.war %>% filter(year_ID == 2015)
    this.sal.2015 <- this.is.war.2015 %>% select(salary)
    this.war.2015 <- this.is.war.2015 %>% select(WAR)
    this.sal.2015.2 <- this.sal.2015[2:3,]
    this.war.2015.2 <- this.war.2015[2:3,]
    plot(this.war.2015.2, this.sal.2015.2)

不确定为什么它不起作用，可能是因为您的数据框设置不正确。

无论如何，更清晰的代码将是：

    data2015 <- this.is.war %>% filter(year_ID == 2015)
    plot(data2015[2:3,'WAR'],data2015[2:3,'salary'])

或者，如果您不打算只使用两个样本，那么它将是：

    data2015 <- this.is.war %>% filter(year_ID == 2015)
    plot(data2015$WAR,data2015$salary)

Answer 2

我不完全确定您的问题是什么，但如果您在控制台中键入？plot，则可以看到绘图功能的帮助页面。绘图功能非常棒，因为它会自动为您做很多事情（比如轴标签等）。我无法看到您的绘图输出，但看起来像 this.war.2015.2 是您的x轴值， this.sal.2015.2 是您的y轴值。

希望这会有所帮助。

情节函数的基本原理

2 个答案: