如何使用 hydroGOF 包按组获得 Nash-Sutcliffe 效率？

Question

我正在尝试获取按变量分组的 NSE 值。我尝试了类似的东西：

library(dplyr)
library(hydroGOF)

mtcars %>% group_by(cyl) %>% 
  NSE(wt,drat)

为什么不起作用？它没有找到 "wt"。谢谢。

Answer 1

这是 summarise 的方法：

mtcars %>% 
  group_by(cyl) %>%
  summarise(NSE = NSE(wt, drat))
# A tibble: 3 x 2
    cyl    NSE
  <dbl>  <dbl>
1     4 -30.2 
2     6  -2.22
3     8 -10.2

你的函数不工作的原因是 %>% 将前一个函数的输出重定向到下一个函数的第一个参数。所以你的相当于 NSE(mtcars,wt,drat)。由于 wt 未在全局环境中定义，因此未找到。

如何使用 hydroGOF 包按组获得 Nash-Sutcliffe 效率？

How to get Nash-Sutcliffe efficiency by group using hydroGOF package?

r

dplyr

hydrogof