将列表缩减为按时间排序的 xts 对象-6ren

将列表缩减为按时间排序的 xts 对象

转载作者：行者123 更新时间：2023-12-04 10:15:27

我在列表中有一些数据，如下所示:

> y
$ABMD.Rank
     ABMD.Rank

$ATVI.Rank
     ATVI.Rank

$ADBE.Rank
     ADBE.Rank

$AMD.Rank
                    AMD.Rank
2020-04-01 17:00:00       22

$AKAM.Rank
     AKAM.Rank

$ALXN.Rank
     ALXN.Rank

$ALGN.Rank
     ALGN.Rank

$LNT.Rank
     LNT.Rank

$AMZN.Rank
     AMZN.Rank

$AAL.Rank
     AAL.Rank

$AMGN.Rank
     AMGN.Rank

$ADI.Rank
     ADI.Rank

$ANSS.Rank
     ANSS.Rank

$AAPL.Rank
                    AAPL.Rank
2020-03-31 17:00:00        22

我想将列表缩减为 xts具有预期输出的对象或数据框:

2020-03-31 15:30:00 CHRW.Rank            
2020-03-31 17:00:00 AAPL.Rank
2020-04-01 17:00:00 AMD.Rank
2020-04-01 21:00:00 CDNS.Rank
2020-04-02 18:00:00 CTXS.Rank 
2020-04-03 19:00:00 CTAS.Rank
2020-04-06 17:00:00 BKNG.Rank

哪个是按时间排序的。

数据:

myList <- list(ABMD.Rank = structure(numeric(0), class = c("xts", "zoo"
), .indexCLASS = c("POSIXct", "POSIXt"), tclass = c("POSIXct", 
"POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
"POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "ABMD.Rank")), 
    ATVI.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "ATVI.Rank")), 
    ADBE.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "ADBE.Rank")), 
    AMD.Rank = structure(22, class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(1585753200, tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = c(1L, 1L), .Dimnames = list(NULL, "AMD.Rank")), 
    AKAM.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "AKAM.Rank")), 
    ALXN.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "ALXN.Rank")), 
    ALGN.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "ALGN.Rank")), 
    LNT.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "LNT.Rank")), 
    AMZN.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "AMZN.Rank")), 
    AAL.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "AAL.Rank")), 
    AMGN.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "AMGN.Rank")), 
    ADI.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "ADI.Rank")), 
    ANSS.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "ANSS.Rank")), 
    AAPL.Rank = structure(22, class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(1585666800, tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = c(1L, 1L), .Dimnames = list(NULL, "AAPL.Rank")), 
    AMAT.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "AMAT.Rank")), 
    ADSK.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "ADSK.Rank")), 
    ADP.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "ADP.Rank")), 
    BIIB.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "BIIB.Rank")), 
    BKNG.Rank = structure(22, class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(1586185200, tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = c(1L, 1L), .Dimnames = list(NULL, "BKNG.Rank")), 
    AVGO.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "AVGO.Rank")), 
    CHRW.Rank = structure(22, class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(1585661400, tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = c(1L, 1L), .Dimnames = list(NULL, "CHRW.Rank")), 
    CDNS.Rank = structure(22, class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(1585767600, tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = c(1L, 1L), .Dimnames = list(NULL, "CDNS.Rank")), 
    CDW.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "CDW.Rank")), 
    CERN.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "CERN.Rank")), 
    CHTR.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "CHTR.Rank")), 
    CINF.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "CINF.Rank")), 
    CTAS.Rank = structure(22, class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(1585933200, tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = c(1L, 1L), .Dimnames = list(NULL, "CTAS.Rank")), 
    CSCO.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "CSCO.Rank")), 
    CTXS.Rank = structure(22, class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(1585843200, tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = c(1L, 1L), .Dimnames = list(NULL, "CTXS.Rank")), 
    CME.Rank = structure(numeric(0), class = c("xts", "zoo"), .indexCLASS = c("POSIXct", 
    "POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "", tzone = "", index = structure(numeric(0), tzone = "", tclass = c("POSIXct", 
    "POSIXt")), .Dim = 0:1, .Dimnames = list(NULL, "CME.Rank")))

最佳答案

我们可以使用 discard来自 purrr并使用 map 将其转换为单个 data.frame

library(purrr)
library(dplyr)
library(xts)
discard(myList, ~ length(.x) == 0| is.null(.x)) %>%
   map(index) %>% 
   enframe %>%
   unnest(c(value)) %>% 
   {xts(.[1], order.by =  .$value)}
#                    name       
#2020-03-31 09:30:00 "CHRW.Rank"
#2020-03-31 11:00:00 "AAPL.Rank"
#2020-04-01 11:00:00 "AMD.Rank" 
#2020-04-01 15:00:00 "CDNS.Rank"
#2020-04-02 12:00:00 "CTXS.Rank"
#2020-04-03 13:00:00 "CTAS.Rank"
#2020-04-06 11:00:00 "BKNG.Rank"

关于将列表缩减为按时间排序的 xts 对象，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/61083536/

文章推荐： c - 为什么随机值显示为输出以查找矩阵的行列式？

文章推荐： ionic-framework - CSRF token 未正确更新(Ionic + Spring Security)

文章推荐： Blazor On Parent 单击然后检查子复选框

文章推荐： ajax - 在自定义 React 钩子(Hook)中的 AJAX 函数后清理

mysql - 如何获取每个日期的最小(时间)和最大(时间)
您好，我是使用 xampp 的 PHPmyadmin 新手，没有 MYSQL 背景。当我喜欢研究它是如何工作的时，我的脑海中浮现出一个想法，它让我一周都无法休眠，因为我似乎无法弄清楚如何使用 MIN(
pointers - 时间.时间 : pointer or value
Go docs say (强调): Programs using times should typically store and pass them as values, not pointers.
MySQL:查找在一个日期(时间)有条目但在另一个日期(时间)没有条目的用户行
我有一组用户在 8 月 1 日有一个条目。我想找到在 8 月 1 日有条目但在 8 月 2 日没有做任何事情的用户。现在是 10 月，所以事件已经过去很久了。我有限的知识说: SELECT * F
json - 时间 JSON 编码为 0 时间
我有以下代码，主要编码和取消编码时间结构。这是代码 package main import ( "fmt" "time" "encoding/json" ) type chec
cpu - 用户 CPU 时间 vs 系统 CPU 时间？
您能详细解释一下“用户 CPU 时间”和“系统 CPU 时间”吗？我读了很多，但我不太理解。最佳答案区别在于时间花在用户空间还是内核空间。用户 CPU 时间是处理器运行程序代码(或库中的代码)所花
profiling - 我应该使用什么分析器来测量_real_ 时间(包括等待系统调用)在此函数中花费，而不是 _CPU_ 时间
应用程序不计算东西，但做输入/输出、读取文件、使用网络。我希望探查器显示它。我希望像 callgrind 中的东西一样，在每个问题中调用 clock_gettime。或者像 oprofile 那样
jQuery 计时器可以在时间 x、时间 y、时间 z 上触发事件吗？
目前我的 web 应用程序接收 websocket 数据来触发操作。这会在页面重新加载时中断，因此我需要一个能够触发特定事件的客户端解决方案。这个想法可行吗？假设你有 TimeX = curre
linux - 找出 JBoss 消耗了多少 cpu 时间、内存和 I/O 时间？
很难说出这里问的是什么。这个问题是含糊的、模糊的、不完整的、过于宽泛的或修辞性的，无法以目前的形式得到合理的回答。如需帮助澄清此问题以便重新打开它，visit the help center 。已关
java - 将 Joda 时间 Instant 转换为 Java 时间 Instant
我有一个 Instant (org.joda.time.Instant) 的实例，我在一些 api 响应中得到它。我有另一个来自 (java.time.Instant) 的实例，这是我从其他调用中获得
python - 如何集成一个函数 w.r.t 时间；即 'y' 是一个数组，时间(t)的值从 1 到 3000 不等
如何集成功能 f(y) w.r.t 时间;即 'y'是一个包含 3000 个值和值 time(t) 的数组从 1 到 3000 不等。所以，在整合 f(y) 后我需要 3000 个值. 积分将是不确定
时间:如何以编程方式创建命名空间？
可以通过 CLI 创建命名空间，但是如何使用 Java SDK 来创建命名空间？最佳答案它以编程方式通过 gRPC API 完成由服务公开。在 Java 中，生成的 gRPC 客户端可以通过 W
Java日期DST调整我的日期/时间
我有一个函数，它接受 2 组日期(开始日期和结束日期)，这些日期将用于我的匹配引擎我必须知道start_date1和end_date1是否在start_date2和end_date2内快进:当我在
Python运行命令行(时间)
我想从 Python 脚本运行“time”unix 命令，以计算非 Python 应用程序的执行时间。我会使用 os.system 方法。有什么方法可以在Python中保存这个输出吗？我的目标是多次运
时间/日期轴的漂亮图形标签的算法？
我正在寻找一种“漂亮的数字”算法来确定日期/时间值轴上的标签。我熟悉 Paul Heckbert's Nice Numbers algorithm . 我有一个在 X 轴上显示时间/日期的图，用户可以
powershell - 获取格式化的通用日期/时间
在 PowerShell 中，您可以格式化日期以返回当前小时，如下所示: Get-Date -UFormat %H 您可以像这样在 UTC 中获取日期字符串: $dateNow = Get-Date
javascript - 检测子窗口何时加载 "each"时间
我正在尝试使用 Javascript 向父子窗口添加一些页面加载检查功能。我的目标是“从父窗口”检测，每次子窗口完全加载然后执行一些代码。我在父窗口中使用以下代码示例: childPage=wi
FFMPEG Drawtext 时间
我正在尝试设置此 FFmpeg 命令的 drawtext 何时开始，我尝试使用 start_number 但看起来它不会成功。 ffmpeg -i 1.mp4 -acodec aac -keyint_
excel - 将长日期文本转换为日期/时间
我收到了一个 Excel (2010) 电子表格，它基本上是一个文本转储。单元格 - J8 具有以下信息 2014 年 2 月 4 日星期二 00:08:06 EST 单元格 - L8 具有以下信息
excel - 时间/日期未转换
我收到的原始数据包含一列具有以下日期和时间戳格式的数据: 2014 年 3 月 31 日凌晨 3:38 单元格的格式并不一致，因为有些单元格有单个空格，而另一些单元格中有两个或三个字符之间的空格。所以
Grails - 如何在我的应用程序中显示版本和构建日期/时间
我想知道是否有办法在我的 Grails 应用程序顶部显示版本和构建日期。编辑:我应该说我正在寻找构建应用程序的日期/时间。最佳答案在您的主模板中，或任何地方。 Server version:

行者123

个人简介

我是一名优秀的程序员,十分优秀！

作者热门文章

滴滴打车优惠券免费领取

全站热门文章

首页

博学

6Ren·AI

商城

将列表缩减为按时间排序的 xts 对象