R 在某个日期之前和之后拆分数据

我有一个数据帧，我想把它分成两个不同的数据帧，一个在某个日期之前，一个在该日期之后。哪一个是最好的代码，我尝试过拆分代码，但似乎无法使其工作？

像这样

df  <- data.frame(date=as.Date("2013-01-01")+1:365, x=1:365)
lst <- split(df,df$date<as.Date("2013-06-01"))

像这样

df  <- data.frame(date=as.Date("2013-01-01")+1:365, x=1:365)
lst <- split(df,df$date<as.Date("2013-06-01"))

---

df让我向您展示如何使用
data.table
快速轻松地完成此操作

require(data.table)
my_df = data.table(a=seq.Date(from=as.Date("2012-01-01"), by=1, len=10),b=10:1)
N = as.Date("2012-01-05") #where you want to split
df1 = my_df[a<N]
df2 = my_df[a>=N]

require（data.table）
my_df=数据表（a=序号日期（自=截止日期（“2012-01-01”），by=1，len=10），b=10:1）
N=截止日期（“2012-01-05”）#您要拆分的位置
df1=我的_df[a=N]
让我向您展示如何使用
data.table
快速轻松地完成此操作

require(data.table)
my_df = data.table(a=seq.Date(from=as.Date("2012-01-01"), by=1, len=10),b=10:1)
N = as.Date("2012-01-05") #where you want to split
df1 = my_df[a<N]
df2 = my_df[a>=N]

require（data.table）
my_df=数据表（a=序号日期（自=截止日期（“2012-01-01”），by=1，len=10），b=10:1）
N=截止日期（“2012-01-05”）#您要拆分的位置
df1=我的_df[a=N]
您能与我们共享您的数据帧吗？请尝试
dput（df[1:10，]）
其中
df
是包含数据帧的变量的名称。您可以与我们共享您的数据帧吗？尝试
dput（df[1:10，]）
其中
df
是包含数据帧的变量的名称。这是否适用于包含365条数据的数据帧？这只是一个示例。唯一的要求是，包含日期的列采用日期格式，或者可以使用转换，例如，当我尝试使用代码df$dates时，
df$dates
df$dates
a日期或字符串？尝试df$dates它会给出以下消息：as.Date.default（df$dates）中的错误：不知道如何将“df$dates”转换为类“Date”这是否适用于包含365条数据的数据帧？这只是一个示例。唯一的要求是，包含日期的列采用日期格式，或者可以使用转换，例如，当我尝试使用代码df$dates时，
df$dates
df$dates
a日期或字符串？尝试df$dates它会给出以下消息：as.Date.default（df$dates）中的错误：不知道如何将“df$dates”转换为类“Date”