以下是一个按日期和行进行求和的R代码示例：

假设有以下数据框，包含日期（date）和值（value）两列：

data <- data.frame(date = c("2021-01-01", "2021-01-01", "2021-01-02", "2021-01-02"),
                   value = c(1, 2, 3, 4))

我们可以使用dplyr包的group_by和summarize函数来按日期和行进行求和：

library(dplyr)

summarized_data <- data %>% 
  group_by(date) %>% 
  summarize(sum_value = sum(value))

print(summarized_data)

运行上述代码将输出：

# A tibble: 2 x 2
  date       sum_value
            
1 2021-01-01         3
2 2021-01-02         7

这里的group_by(date)将数据按日期进行分组，然后summarize(sum_value = sum(value))将每个组中的值列求和，并创建一个新的列sum_value来存储求和结果。最后，我们使用print函数来打印求和结果。

希望对你有帮助！