时间戳

首页 > 解决方案 > 流持续时间曲线 - 带有列表中数据框名称的标题

r - 流持续时间曲线 - 带有列表中数据框名称的标题

问题描述

我想为每个站点的每日流量创建一个流量持续时间曲线 (FDC)。每个站点的每日流量被保存为列表中的动物园对象。当我为每个站绘制 FDC 时，我想在标题中放入与扩展名相对应的列表中数据框的名称。

这是我列表的结构

> str(listDF_zoo)
List of 2
 $ 094985005:‘zoo’ series from 2007-10-31 to 2020-09-29
  Data: Named num [1:4718] 0 0 0 0 0 0 0 0 0 0.01 ...
  ..- attr(*, "names")= chr [1:4718] "1" "2" "3" "4" ...
  Index:  Date[1:4718], format: "2007-10-31" "2007-11-01" "2007-11-02" "2007-11-03" ...
 $ 09498501 :‘zoo’ series from 1995-10-01 to 2020-09-29
  Data: Named num [1:9131] 0.14 0.08 0.08 0.07 0.07 0.06 0.07 0.07 0.07 0.07 ...
  ..- attr(*, "names")= chr [1:9131] "1" "2" "3" "4" ...
  Index:  Date[1:9131], format: "1995-10-01" "1995-10-02" "1995-10-03" "1995-10-04" ...

这是我正在使用的代码：

FDC <- lapply(listDF_zoo,function(x){fdc(x, main=names(x))})

部分main=names(x)不起作用，这是我想要改变的部分

标签： rlistplottime

解决方案

您可以使用可以访问 data 和 namepurrr的 's ：imap

FDC <- purrr::imap(listDF_zoo, ~fdc(.x, main=.y))

推荐阅读