程序员经验分享-hwhale

R - XTS：从缺少行的每日时间序列中获取每个月的第一个日期和值

2024-04-11

我有一个每日时间序列作为myxtsxts 对象在R，日期格式为 d/m/y。 现在，我想将原始时间序列减少为仅采用该系列中每个月的第一个日期和值的时间序列。

myxts[.indexmday(myxts) == 1]返回包含 d/m/y 且 d = 1 的序列。

我的问题是我每个月需要 1 个数据，而我的问题是我的原始系列有一些月份没有日期和第一个日历日期的数据。

我怎么说R如果没有这样的日期，则取该特定月份的第二天，如果后者不可用，则取第三天，依此类推......

例如，在下面的示例数据中，没有 2014 年 2 月 1 日。也没有 1 月 1 日。

dates <- c('14/02/2014', '13/02/2014', '12/02/2014', '11/02/2014', '10/02/2014', '07/02/2014', '06/02/2014', '05/02/2014', '04/02/2014', '03/02/2014', '31/01/2014', '30/01/2014', '29/01/2014', '28/01/2014', '27/01/2014', '24/01/2014', '23/01/2014', '22/01/2014', '21/01/2014', '20/01/2014', '17/01/2014', '16/01/2014', '15/01/2014', '14/01/2014', '13/01/2014', '10/01/2014', '09/01/2014', '08/01/2014', '07/01/2014', '06/01/2014', '03/01/2014', '02/01/2014', '31/12/2013', '30/12/2013', '27/12/2013', '26/12/2013', '24/12/2013', '23/12/2013', '20/12/2013', '19/12/2013', '18/12/2013', '17/12/2013', '16/12/2013', '13/12/2013', '12/12/2013', '11/12/2013', '10/12/2013', '09/12/2013', '06/12/2013', '05/12/2013', '04/12/2013', '03/12/2013', '02/12/2013', '29/11/2013', '28/11/2013', '27/11/2013', '26/11/2013', '25/11/2013', '22/11/2013', '21/11/2013', '20/11/2013', '19/11/2013', '18/11/2013', '15/11/2013', '14/11/2013', '13/11/2013', '12/11/2013', '11/11/2013', '08/11/2013', '07/11/2013', '06/11/2013', '05/11/2013', '04/11/2013', '01/11/2013', '31/10/2013', '30/10/2013', '29/10/2013', '28/10/2013', '25/10/2013', '24/10/2013', '23/10/2013', '22/10/2013', '21/10/2013', '18/10/2013', '17/10/2013', '16/10/2013', '15/10/2013', '14/10/2013', '11/10/2013', '10/10/2013', '09/10/2013', '08/10/2013', '07/10/2013', '04/10/2013', '03/10/2013', '02/10/2013', '01/10/2013', '30/09/2013', '27/09/2013', '26/09/2013', '25/09/2013', '24/09/2013', '23/09/2013', '20/09/2013', '19/09/2013', '18/09/2013', '17/09/2013', '16/09/2013', '13/09/2013', '12/09/2013', '11/09/2013', '10/09/2013', '09/09/2013', '06/09/2013', '05/09/2013', '04/09/2013', '03/09/2013', '02/09/2013', '30/08/2013', '29/08/2013', '28/08/2013', '27/08/2013', '26/08/2013', '23/08/2013', '22/08/2013', '21/08/2013', '20/08/2013', '19/08/2013', '16/08/2013', '15/08/2013', '14/08/2013', '13/08/2013', '12/08/2013', '09/08/2013', '08/08/2013', '07/08/2013', '06/08/2013', '05/08/2013', '02/08/2013', '01/08/2013', '31/07/2013', '30/07/2013', '29/07/2013', '26/07/2013', '25/07/2013', '24/07/2013', '23/07/2013', '22/07/2013', '19/07/2013', '18/07/2013', '17/07/2013', '16/07/2013', '15/07/2013', '12/07/2013', '11/07/2013', '10/07/2013', '09/07/2013', '08/07/2013', '05/07/2013', '04/07/2013', '03/07/2013', '02/07/2013', '01/07/2013', '28/06/2013') 
values <- c(920.25, 918.5, 921.5, 921.5, 921, 919, 906.25, 899, 906.25, 903, 917, 924, 923.75, 917.5, 914.5, 921.75, 922.5, 919, 919, 907.75, 916.25, 907.5, 913.75, 900.25, 907, 907.25, 907.25, 912.25, 910.5, 910.25, 910.25, 923.5, 944.25, 945.5, 955.75, 950, 944.25, 945.75, 945.25, 935.25, 929, 919.5, 931.5, 917.75, 932, 932, 928, 934.25, 940.75, 943.75, 947.25, 945.75, 942.75, 943, 942, 941, 944.5, 934.75, 937.75, 923.25, 911, 910.75, 910.25, 911.25, 908.75, 901.25, 903.25, 903.25, 893, 888.5, 905, 903, 904, 915, 932.5, 937.25, 930.5, 925.75, 909.75, 911.5, 920, 936.5, 941.5, 939.25, 931.5, 945, 940.25, 931.5, 933.5, 925.25, 925.25, 935.5, 926.25, 922.5, 926.5, 922.5, 905.25, 913, 927.25, 920.5, 919, 906, 913, 925.25, 934.5, 924.25, 925.75, 944.25, 949.75, 943.5, 943.5, 938.75, 960, 971, 963.75, 960.75, 960.25, 958.5, 969.5, 978.75, 970, 961.75, 940.25, 941.75, 936.25, 938.75, 938.75, 942.25, 941.25, 937.25, 926, 927.75, 903.75, 903.75, 896, 906, 909.25, 920.25, 923.75, 927, 910.5, 908, 913.75, 910.5, 913.75, 914.25, 919.75, 918.5, 925.75, 928.75, 923.75, 919.75, 916.5, 916.25, 913.75, 913.75, 909.25, 913.25, 911.75, 902.25, 903.25, 879.75, 883.25, 883.25)
myxts <- as.xts(values, order.by = as.Date(dates, format = '%d/%m/%Y'))

有一个未导出的startof此处可能有用的函数

myxts[xts:::startof(myxts, "months")]
             [,1]
2013-06-28 883.25
2013-07-01 883.25
2013-08-01 927.00
2013-09-02 958.50
2013-10-01 905.25
2013-11-01 915.00
2013-12-02 942.75
2014-01-02 923.50
2014-02-03 903.00
本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)

r

TimeSeries

xts

R - XTS：从缺少行的每日时间序列中获取每个月的第一个日期和值 的相关文章

随机推荐

  • 哪些因素影响 ggplot 图例的排序方式

    我正在 R 中创建一个散点图 用户可以在其中添加或删除显示固定参考值的水平线 这样做时 我注意到更改参考线的名称会对图例重新排序 因此有时水平线出现在散点图例元素之前 有时出现在之后 Compare to 下面是一个可重现的示例 YEAR

  • 从 URL 获取图像作为缓冲区

    我花了几个小时尝试获取图像数据作为缓冲区 搜索结果导致我使用 请求 模块 其他建议导致使用更高版本的节点中的其他模块 我无法使用它 因为我们依赖于节点 v 6 11迄今为止 这是我的试验 request imageURL pipe fs c

  • 如何在没有唯一索引或主键的情况下在 MySQL 中使用 ON DUPLICATE KEY UPDATE？

    MySQL 手册指出 如果指定 ON DUPLICATE KEY UPDATE 并且插入一行 会导致 UNIQUE 索引或 PRIMARY KEY 中出现重复值 如果您的表没有 UNIQUE 索引或 PRIMARY KEY 但您不想重复列的

  • 如何在php中将日期和时间转换为时间戳？

    我有个约会 07 23 2009 和一个时间 18 11 我想从中获取时间戳 这是我的例子 date default timezone set UTC d str replace 07 23 2009 t str replace 18 11

  • 使用 useReducer 时如何获取 useCallback 中的当前状态？

    将 React hooks 与 TypeScript 一起使用 这是我想要做的事情的最小表示 在屏幕上有一个按钮列表 当用户单击按钮时 我想将按钮的文本更改为 单击按钮 并且然后只重新渲染被单击的按钮 我使用 useCallback 来包装

  • 如何在Python中连接整数区间？

    我已经使用了模块间隔 http pyinterval readthedocs io en latest index html http pyinterval readthedocs io en latest index html 并从一组或

  • Ruby on Rails 源代码安全/混淆[重复]

    这个问题在这里已经有答案了 我刚刚开始 Ruby on Rails 开发 我有一个关于源代码 隐私 的问题 据我目前所知 我还没有做部署 只是在本地开发环境中使用了FoR 当部署 RoR 应用程序时 所有源代码在服务器上都是 可见 的 我如

  • 从其子序列的集合中构建最短的字符串

    给定字符串中的子序列的集合 例如 abc acd bcd 问题是 如何从这些序列中确定最短的字符串 对于上面的例子 最短的字符串是abcd Here 子序列表示字符串的一部分 但不一定是连续的 喜欢acd是字符串的子序列abcd Edit

  • 防止 PowerShell 将值类型包装在 PSObject 中

    我有一个使用大量委托的 NET API 我的 API 有几个类似于以下的方法 public static class MyClass public static void DoSomethingWithString Func myFunc

  • 默认 xml 命名空间在 XAML 中如何工作？

    xmlns http schemas microsoft com winfx 2006 xaml presentation 该 url 如何映射到 NET 命名空间 您能否举例说明如何对自定义 NET 类 命名空间执行相同的操作 它是一个必

  • 无法启动 uwsgi 进程

    无法通过 ini 标志启动 uwsgi 进程 uwsgi ini file ini 没有任何 uwsgi pid ps aux grep uwsgi root 31605 0 0 0 3 5732 768 pts 0 S 06 46 0 0

  • 如何计算cosmos DB中的不同值

    我在 Cosmos DB 中创建了一些文档 如下所示 class class01 student lastReport Name st01 score C Name st02 score B lastTime 2018 05 10 clas

  • Django 测试返回登录重定向 302，即使用户已登录

    我对如何测试需要登录的页面感到非常困惑 我在响应中不断收到 302 而不是 200 并且在检查 pdb 中的响应时 我肯定会重定向到登录页面 我正在使用登录中间件而不是装饰器 如果相关的话 class SimplePageLoadsTest

  • Qt 自定义动画按钮

    我正在尝试创建自定义动画按钮 我找到了这个页面 按钮示例 https tympanus net Development ButtonHoverStyles 我喜欢这个网站上的 3 和 19 我试过做3个 但不一样 有人能帮我吗 我的网站上第

  • 我可以将 JavaScript 对象存储在 mySQL 数据库中吗？

    我正在从网页访问者收集数据并将其放入我创建的 JavaScript 对象中 但后来我希望能够引用他们输入的数据 我可以访问 MySQL 数据库 那么有没有办法在那里存储这个对象 我想尝试将其保留为对象格式 而不是将其分解为单独的部分 Sto

  • 在 RecyclerView 中显示包含视频文件的文件夹

    我在回收器视图中列出了所有媒体文件 假设媒体文件位于文件夹中 那么我也想在回收站视图中显示该文件夹 这是我列出媒体文件的代码 var projection arrayOf MediaStore Video Media DISPLAY NAM

  • 如何使用 XPath 2.0 识别数字序列中的重复值？

    我有一个 XPath 表达式 它为我提供了一系列值 如下所示 1 2 2 3 4 5 5 6 7 这很容易转换为一系列唯一值1 2 3 4 5 6 7 using distinct values 但是 我想要提取的是重复值列表 2 5 我想

  • 在哪里可以下载 Jai 和 Jai-imageio？ [关闭]

    Closed 这个问题是无关 help closed questions 目前不接受答案 我需要获取 a 的像素颜色TIFF图片 如果您知道任何替代方案Jai and Jai imageio请告诉我 干得好 http www oracle

  • Application.Run 处的 CallbackOnCollectedDelegate(new Form1())

    我制作了一个非常小的应用程序 使用 SlimDX 捕获游戏中的屏幕 我按左键捕获 捕获有效 至少当我单击表单本身时 但是一旦我单击 Firefox 或任何其他应用程序 我就会收到此异常 对 CaptureScreen CaptureScre

  • R - XTS：从缺少行的每日时间序列中获取每个月的第一个日期和值

    我有一个每日时间序列作为myxtsxts 对象在R 日期格式为 d m y 现在 我想将原始时间序列减少为仅采用该系列中每个月的第一个日期和值的时间序列 myxts indexmday myxts 1 返回包含 d m y 且 d 1 的序

热门标签