以下是一个按日期分组的行数统计的R代码示例：

# 创建一个示例数据框
df <- data.frame(
  date = c("2021-01-01", "2021-01-01", "2021-01-02", "2021-01-02", "2021-01-03"),
  value = c(10, 20, 30, 40, 50)
)

# 将日期列转换为日期类型
df$date <- as.Date(df$date)

# 使用dplyr包进行按日期分组和行数统计
library(dplyr)

result <- df %>%
  group_by(date) %>%
  summarise(row_count = n())

# 打印结果
print(result)

运行上述代码将输出按日期分组的行数统计结果：

# A tibble: 3 x 2
  date       row_count
           
1 2021-01-01         2
2 2021-01-02         2
3 2021-01-03         1

这段代码使用了dplyr包中的group_by和summarise函数来按日期分组并计算每个日期的行数。结果以一个tibble的形式展示，其中包含了日期和行数两列。