开发者社区

文档建议反馈控制台

最新优惠活动

文章/答案/技术大牛

发布

lubridate with_tz不能与dplyr group_by一起使用

lubridate是一个R语言的日期和时间处理包，而with_tz()函数是lubridate包中的一个函数，用于将日期和时间转换为指定时区的日期和时间。dplyr是另一个R语言的数据处理包，其中的group_by()函数用于按照指定的变量对数据进行分组。

然而，lubridate中的with_tz()函数与dplyr中的group_by()函数在使用时存在一些限制。具体来说，当使用with_tz()函数将日期和时间转换为指定时区后，再使用dplyr中的group_by()函数进行分组操作时，可能会出现错误或不符合预期的结果。

这种限制是由于with_tz()函数在转换时会改变日期和时间的属性，而dplyr中的group_by()函数对日期和时间的处理是基于其原始属性进行的。因此，在使用lubridate和dplyr时，建议在进行分组操作之前先完成日期和时间的转换，或者使用其他方法来处理时区的转换和分组操作。

对于这个问题，可以考虑以下解决方案：

在使用with_tz()函数进行时区转换之后，将结果保存为一个新的变量，然后再使用group_by()函数进行分组操作。例如：

library(lubridate)
library(dplyr)

# 创建一个包含日期和时间的数据框
data <- data.frame(datetime = c("2022-01-01 12:00:00", "2022-01-02 12:00:00"),
                   value = c(1, 2))

# 将日期和时间转换为指定时区（例如："Asia/Shanghai"）
data$datetime_tz <- with_tz(data$datetime, tzone = "Asia/Shanghai")

# 使用group_by()函数进行分组操作
data_grouped <- data %>% 
  group_by(datetime_tz) %>% 
  summarise(total_value = sum(value))

如果需要在分组操作之前进行时区转换，可以考虑使用其他函数或方法来处理时区转换和分组操作。例如，可以使用lubridate包中的force_tz()函数来强制将日期和时间转换为指定时区，然后再使用dplyr中的group_by()函数进行分组操作。例如：

library(lubridate)
library(dplyr)

# 创建一个包含日期和时间的数据框
data <- data.frame(datetime = c("2022-01-01 12:00:00", "2022-01-02 12:00:00"),
                   value = c(1, 2))

# 强制将日期和时间转换为指定时区（例如："Asia/Shanghai"）
data$datetime_tz <- force_tz(data$datetime, tzone = "Asia/Shanghai")

# 使用group_by()函数进行分组操作
data_grouped <- data %>% 
  group_by(datetime_tz) %>% 
  summarise(total_value = sum(value))

需要注意的是，以上解决方案仅针对lubridate中的with_tz()函数与dplyr中的group_by()函数的组合使用问题进行了说明。在实际应用中，还需要根据具体情况选择适当的方法和函数来处理日期和时间的时区转换和分组操作。

页面内容是否对你有帮助？

有帮助

没帮助

相关·内容

你以为川普的推特都是他自己写的？数据可不这么认为！

主要考虑推文是在一天内什么时间发布的，在此我们可以发现区别： ♦ library(lubridate) ♦ library(scales) tweets %>% count(source, hour...= hour(with_tz(created, "EST"))) %>% mutate(percent = n / sum(n)) %>% ggplot(aes(hour, percent, color...而 iPhone 转推时，一般不使用双引号。 ?...用词对比在对比安卓和 iPhone 用词区别时，David 用到了他和 Julia Silge 一起编写的 tidytext 包。...但据报道，上任后的川普必须使用一部由美国特工处认证的安全加密手机，以替换他之前使用的安卓系统手机。据称前总统奥巴马就无法通过安全手机发推文，那使用安全手机后，川普还能继续愉快的“推特治国”吗？ ?

9876 0

【钱塘号】用R语言爬取美国总统的twitte进行数据分析

发推时间对比首先用 twitteR 包中的 userTimeline 函数导入川普发推的时间数据： ♦ library ( dplyr ) ♦ library ( purrr )...主要考虑推文是在一天内什么时间发布的，在此我们可以发现区别： ♦ library(lubridate) ♦ library(scales) tweets %>% count(source..., hour = hour(with_tz(created, "EST"))) %>% mutate(percent = n / sum(n)) %>% ggplot(aes(hour, percent...比如下面这条：而川普安卓端发的推文没有图片、链接，更多是直接的文字，比如：用词对比在对比安卓和 iPhone 用词区别时，David 用到了他和 Julia Silge 一起编写的...但据报道，上任后的川普必须使用一部由美国特工处认证的安全加密手机，以替换他之前使用的安卓系统手机。据称前总统奥巴马就无法通过安全手机发推文，那使用安全手机后，川普还能继续愉快的“推特治国”吗？

2.3K7 0

用R语言爬取美国新总统-川普的twitte进行数据分析

发推时间对比首先用 twitteR 包中的 userTimeline 函数导入川普发推的时间数据： ♦ library ( dplyr ) ♦ library ( purrr )...主要考虑推文是在一天内什么时间发布的，在此我们可以发现区别： ♦ library(lubridate) ♦ library(scales) tweets %>% count(source..., hour = hour(with_tz(created, "EST"))) %>% mutate(percent = n / sum(n)) %>% ggplot(aes(hour, percent...比如下面这条：而川普安卓端发的推文没有图片、链接，更多是直接的文字，比如：用词对比在对比安卓和 iPhone 用词区别时，David 用到了他和 Julia Silge 一起编写的...但据报道，上任后的川普必须使用一部由美国特工处认证的安全加密手机，以替换他之前使用的安卓系统手机。据称前总统奥巴马就无法通过安全手机发推文，那使用安全手机后，川普还能继续愉快的“推特治国”吗？

2.7K5 0

ggplot2可视化情人节消费支出

❝本节来介绍如何使用ggstar包绘制心形并通过哑铃图的形式来展示美国情人节消费支出，数据为随意构建，整个过程仅参考。希望对各位观众老爷能有所帮助。...ggstar) library(tidyverse) R包版本号版本号尽量保持一致，不然可能会有报错参生 sessionInfo() other attached packages: [1] lubridate..._1.9.3 forcats_1.0.0 stringr_1.5.1 dplyr_1.1.4 purrr_1.0.2 [6] readr_2.1.5 tidyr...Clothing","GiftCards") %>% rev()) 构建标签位置信息 df_text % select(-Gender) %>% group_by

931 0

R语言日期、时间和lubridate包

strptime(x,format="",tz="")，参数tz是时区(time zone)，默认是空，在解析时，如果不指定时区，R会调用Sys.timezone( ) 。..."lubridate") library(lubridate) 系统的当前时间lubridate::now()，和Sys.time()函数返回的时间相同系统的当前日期lubridate::today(...包提供了三个函数： tz: 提取数据数据的时区 tz(today()) with_tz：将时间数据转换为另一个时区的同一时间，时间值改变但是时间不变 force_tz;将时间数据的时区强制转换为另一个时区...，时间值不变但是时间会变 > times <- now(tzone = "UTC") > > with_tz(times,tz="America/Chicago") [1] "2020-11-04...周期period根据日历来指定时间阔度，这意味着，在把周期添加到一个时间之前，period的确切的时间跨度是不固定的。例如，一年的周期可以是365天，也可以是366天，这取决于它是否是闰年。

5.5K1 0

R改进版: 动态全国各省新型冠状病毒疫情变化

library(alimap) # to get China map at the prefecture city level library(sf) library(ggplot2) library(dplyr...(tidyr) library(magrittr) library(purrr) library(readr) library(stringr) library(gganimate) library(lubridate...因为很多市级地名存在变化，而且爬取的比较乱，部分没有“市”这个字，所以使用前2个汉字进行联结表。以地图数据集中的城市名为准。...# set start day startTime <- ymd_h("2020/1/25 21", tz="Asia/Shanghai") nowTime % with_tz...~read_epidemic(.x))) %>% select(-myAPI) %>% unnest() 5.1 分箱因为很多市级地名存在变化，而且爬取的比较乱，部分没有“市”这个字，所以使用前

1.4K2 1

R 和 RStudio 的安装及 R Profile 的配置 & 爬取 CRAN 上的所有 R 包的名称、发布日期和标题

基于这种设定，使用 R 基础绘图系统绘图的结果将会是这样的： hist(iris$Sepal.Length) 使用 ggplot2 绘图的结果是这样的： library(ggplot2) ggplot...CRAN/web/packages/available_packages_by_date.html 显然，这是个表格，很容易爬取： library(rvest) library(tidyverse) # lubridate...是处理日期的一个 R 包 library(lubridate) library(hrbrthemes) # 需要耐心地等待一会儿 pkg <- "https://mirrors.tuna.tsinghua.edu.cn...) # install.packages("ggchicklet", repos = "https://cinc.rud.is") library(ggchicklet) pkg %>% group_by...Data Source: \nhttps://mirrors.tuna.tsinghua.edu.cn/CRAN/", x = "", y = "") 按年统计： pkg %>% group_by

3.4K4 0

「R」dplyr 列式计算

❝在近期使用「dplyr」进行多列选择性操作，如 mutate_at() 时，发现文档提示一系列的「dplyr」函数变体已经过期，看来后续要退休了，使用 across() 是它们的统一替代品，所以最近抽时间针对性的学习和翻译下...dplyr」动词函数一起工作： •重新缩放所有数值变量到范围 0-1： rescale01 <- function(x) { rng <- range(x, na.rm = TRUE) (x..._if, _at, _all 「dplyr」以前的版本允许以不同的方式将函数应用到多个列：使用带有_if、_at和_all后缀的函数。这些功能解决了迫切的需求而被许多人使用，但现在被取代了。...这使「dplyr」更容易使用（因为需要记住的函数更少），也使我们更容易实现新的动词（因为我们只需要实现一个函数，而不是四个）。...」的开发者们通过 across() 简化了「dplyr」对于一些数据复杂操作的处理逻辑，提高了整体的学习和使用效率，让我们使用者更关注于逻辑而非实现上。

2.4K1 0

教你几招R语言中的聚合操作

在R语言中提供了几种实现数据聚合的常用函数，它们分别是基于stats包中的aggregate函数、基于sqldf包中的sqldf函数以及基于dplyr包中的group_by函数和summarize函数。...na.action：指定缺失值的处理办法，默认为删除缺失值；为使读者进一步理解aggregate函数的以上两种用法，将以某商户的订单数据为例，统计每天的交易额，代码如下： # 加载第三方包 library(lubridate...基于group_by和summarize函数的聚合 ---- 结合dplyr包中的group_by函数和summarize函数实现数据的分组聚合可以避开aggregate函数和sqldf函数的一些缺点，...而且使用起来也非常的方便和快捷。...指定已分组的数据框，即通过group_by函数处理的数据框； ...

3.3K2 0

dplyr数据处理

cyl == 6,mpg>21) dplyr::filter(mtcars,cyl == c(4,6),mpg>21) 二、排序 arrange() arrange()函数的使用方法与 filter.../People) 七、统计使用 summarise()可以对每一列单独进行计算，例如求和，求平均值等，这些都可以使用apply 系列函数来完成，summarise()一般都配合 group_by...()函数一起使用，可以进行分组统计。...分组统计：group_by()函数与 summarise()配合一起使用，可以进行分组统计。...x %>% summarise(sum(Income)) x %>% group_by(Province) %>% summarise(length(Income)) x %>% group_by(Province

1.5K1 0

《高效R语言编程》6--高效数据木匠

这是本书最重要的一章，将涉及以下内容：使用tidyr整理数据使用dplyr处理数据使用数据库使用data.table处理数据软件配置 library("tibble") library("tidyr...tibble会打印每个变量的类，data.frame不会 stringAsFactors默认不转换输出时，只输出前10行使用tidyr与正则表达式整理数据整理数据包括数据清理和数据重构，前者是重定格式与标记脏数据...通常的数据清理是将非标准文本字符串转换成lubridate简介所描述的数据格式。vignette("lubridate") ? 整洁是个广泛的概念，也包括重构数据，以便有利于数据分析和建模。...与基本R中类似函数不同，变量无需使用 $ 操作符就可直接使用，设计与magrittr包的%>%管道操作符一起使用，以允许每个数据阶段写成新的一行。其是一个大型包，本身可以看成一门语言。...数据库与dplyr 必须使用src_*()函数创建一个数据源。#　使用data.table()处理数据是dplyr的替代，两个哪个好存在争议，最好学一个一直坚持下去。

1.9K2 0

生信技能树七天学习小组 Day6笔记——学习R包

")library(dplyr)2 dplyr的五个基础函数test % ) 将一系列操作“通过管道”连接在一起，该运算符最常与 R 中的dplyr包一起使用，以对数据帧执行一系列操作。...使用管道运算符的优点是它使代码非常易于阅读。

701 0

什么是sparklyr

如下：使用dplry（https://github.com/tidyverse/dplyr）和SQL（通过DBI）交互式的操作Spark的数据。...我们同时也很高兴与行业内的几个合作伙伴一起来推动和完善这个项目。...") batting_tbl <- copy_to(sc, Lahman::Batting, "batting") 使用dplyr ---- 针对集群中的表，我们现在可以使用所有可用的dplyr的verbs...delay % group_by(tailnum) %>% summarise(count = n(), dist = mean(distance), delay =...summary(fit) Spark机器学习支持众多的算法和特征变换，如上所示，你会发现将这些功能与dplyr管道链接起来很容易。

2.2K9 0

R语言大数据分析纽约市的311万条投诉统计可视化与时间序列分析

或者，可以只使用默认的ggplot2图形。...set_credentials_file("DemoAccount", "lr1c37zw81") ## Replace contents with your API Key 使用dplyr在R中进行分析...关于dplyr 默认情况下，dplyr查询只会从数据库中提取前10行。...= .N), Agency]#setkey(dt, No.Complaints) # setkey index's the dataq % select(Agency) %>% group_by...- Street/Sidewalk 2015-11-04 02:10:45 NEW YORK 02 汇总时间序列首先，创建一个时间戳记四舍五入到前15分钟间隔的新列 # Using lubridate

1.2K0 0

dplyr-cli：在Linux Terminal上直接执行dplyr

csv 不执行dplyr命令，仅将输入数据作为CSV输出到stdout kable不执行dplyr命令，而仅将输入数据作为 knitr::kable()格式字符串输出到stdout 其工作原理：dplyr-cli...使用 {littler}在终端中的CSV文件上运行dplyr命令。...另外一个很友善的功能是， dplyr-cli使用终端管道 |运行命令。...summarise="dplyr summarise"alias group_by="dplyr group_by"alias ungroup="dplyr ungroup"alias count="...dplyr count"alias arrange="dplyr arrange"alias kable="dplyr kable" 下面就来体验一下起飞的感觉： cat mtcars.csv | group_by

2K1 0

🤩 superheat | 超级简单的热图绘制解决方案！~（二）（聚类和注释图的添加~）

常用的类型有以下几种，我们一起看看吧。..."springgreen4"), yr.point.size = 4) ---- 5.5 只显示一个聚类点 mpg.per.cluster % group_by..., yr.obs.col = rep("beige", nrow(mtcars))) ---- 8.3 聚类 mpg.per.cluster % group_by...yr.cluster.col = c("beige", "white", "beige")) 9注释图-Boxplot 9.1 基础绘图 mpg.per.cluster % group_by...yt.plot.type = "bar", yt.axis.name = "Correlation\nwith mpg") ---- 10.2 调整坐标轴名称及数字大小可以分别使用

1983 0

R数据科学整洁之道：使用dplyr操作数据表

今天为大家介绍一个 R 语言数据分析必学的包：dplyr。...2、随后的参数使用变量名称（不带引号）描述了在数据框上进行的操作。 3、输出结果是一个新数据框。...() 一起使用，那么 summarize() 也就没什么大用。...group_by() 可以将分析单位从整个数据集更改为单个分组。接下来，在分组后的数据框上使用 dplyr 函数时，它们会自动地应用到每个分组。...() 和 summarize() 的组合构成了使用 dplyr 包时最常用的操作之一：分组摘要。

8903 0

左手用R右手Python系列——七周数据分析师学习笔记R语言、Python版

MySQL入门学习笔记——七周数据分析师实战作业这一篇，仍然是相同的六个业务问题，我尝试着R语言、Python复盘一遍，这样你可以对比同样的业务逻辑，使用不同工具处理之间的效率、逻辑的差异，以及各自的优缺点...R语言版： library("magrittr") library("plyr") library("dplyr") library("lubridate") userinfo % #筛选已支付且有效的购买记录 select(gender,userId) %>% group_by(gender...= '') %>% group_by(trend) %>% summarize(mean_price=mean(price,na.rm=TRUE)) %>%...= '') %>% group_by(userId) %>% summarize(sum_sp=sum(price)) %>% arrange

1.4K6 0

34. R 数据整理（六：根据分类新增列的种种方法 1.0）

library(dplyr) test <- iris[c(1:2,51:52,101:102),] rownames(test) =NULL 必备dplyr技巧 mutate 新增一列。...summarize(test, mean(Sepal.Length), sd(Sepal.Length)) group_by group_by 按照某列对数据框进行分组，非常适合联合summarize...group_by(test, Species) tmp = summarise(group_by(test, Species),mean(Sepal.Length), sd(Sepal.Length))...处理关系数据即通过dplyr 包将表格进行连接。...将两个数据框按照probe_id列连接在一起 deg_join <- inner_join(deg, ids, by = 'probe_id') head(deg_join)

2K2 0

gt包绘制表格详细介绍！

使用内置的gtcars数据集进行演示，这个数据集是根据mtcars数据改编而来。...分组操作隐藏、移动某些列列分组操作合并列 & 添加标签使用格式化功能对齐方式及风格主体的字体美化标题和副标题添加脚注 library(gt) library(dplyr) glimpse...group_by()函数： tab % group_by(ctry_origin) %>% arrange(mfr, desc(msrp)) %>% gt(...mpg_c, mpg_h), after = trim ) tab image-20220514144632159 列分组操作列分组操作非常常见，有时我们需要一个小表头，把不同的列聚在一起...Automatic", substr(x, 2, 3) == "dd" ~ "Direct Drive" ) # 把speed和type拼在一起

6672 0

点击加载更多

扫码

添加站长进交流群

领取专属 10元无门槛券

手把手带您无忧上云

扫码加入开发者社群

相关资讯

热门标签

活动推荐

运营活动

活动名称

广告关闭