R中的离散反褶积

我有一组数据，有两个稍微重叠的峰，我想去卷积到它们各自的分量中

测量数据（

变量h

）是第一个事件（

变量f

）和第二个未测量事件（通常表示为

变量g

）的函数。可使用以下代码重构数据集：

h <- as.numeric(c(256, 208, 139, 406, 316, 226))
f <- as.numeric(c(256, 208, 139))
t <- as.numeric(c(1, 2, 4, 5, 6, 8))
test <- data.frame(h, f, t)

---

h是给定的指数衰减率，还是一个模型参数？这是一个模型参数，我使用事件#2的数据拟合得到。我获得的速率值等于0.1990，平台约束为0。