,可以使用以下步骤:
data
,组的列名为group
,日期列名为date
,可以使用以下代码进行分组:setkey(data, group)
lubridate
包中的函数来处理日期。假设日期列的格式为YYYY-MM-DD
,可以使用以下代码找到每个组的第一个日历月:library(lubridate)
data[, first_month := floor_date(min(date), "month"), by = group]
data <- data[date != first_month, ]
完整的代码如下:
library(data.table)
library(lubridate)
# 1. 分组
setkey(data, group)
# 2. 找到每个组的第一个日历月
data[, first_month := floor_date(min(date), "month"), by = group]
# 3. 删除每个组的第一个日历月的数据
data <- data[date != first_month, ]
这样,就可以在data.table中删除每个组的第一个日历月的数据。请注意,以上代码中没有提及具体的腾讯云产品,因为与问题无关。
领取专属 10元无门槛券
手把手带您无忧上云