以下是一个使用R语言的示例代码，演示了如何按组从前一行减去日期：

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

# 按组进行日期相减操作
df$diff_date <- unlist(by(df$date, df$group, function(x) c(0, diff(x))))

# 输出结果
print(df)

输出结果如下：

  group       date value diff_date
1     A 2021-01-01    10         0
2     A 2021-01-02    20         1
3     A 2021-01-03    30         1
4     B 2021-01-01    40         0
5     B 2021-01-02    50         1
6     B 2021-01-03    60         1

在上述代码中，我们首先创建了一个示例数据框df，其中包含了group、date和value三列。然后，我们使用by函数按group对date进行分组，并在每个组内使用diff函数计算日期的差异。最后，我们将计算结果赋给新的列diff_date。注意，为了保持数据的完整性，我们在每个分组的第一行填充了0值。

这样，我们就实现了按组从前一行减去日期的操作。