R 联合概率：当满足规定标准时，我如何确定事故的比例？

我有数据集，包括一年中每一天的土壤温度和土壤水分含量。我想找出两个变量通过种子发芽所需的某些阈值时的天数比例（即，我需要的答案是土壤和水分同时满足指定标准的天数的X%）

在阅读了stackoverflow之后，我想mvtnorm包可以做我需要的事情，但是我不能让它产生我需要的输出。我经常使用R进行数据探索和分析，但我的实际脚本编写/编码能力非常差。我举了一些有用的例子，并根据自己的需要加以调整

非常感谢您的帮助

我试图附加示例数据，但无法使其工作。基本上只有两列数据，都是数字

SoilTemps, SoilMoist 18.1, -150303.4661 18.16283368, -150303.4661 18.21250712, -150303.4661 18.56594505, -150303.4662 土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土工土 18.1, -150303.4661 18.16283368, -150303.4661 18.21250712, -150303.4661 18.56594505, -150303.4662

---

有不同的解决方案可供选择。这里有一个选项可以让你开始

# Assume the data is as below
DF <- structure(list(x = c(18.1, 18.16283, 18.21251, 18.56595), y = c(-150303.4661, 
-150303.4661, -150303.4661, -150303.4662)), .Names = c("x", "y"
), row.names = c(NA, -4L), class = "data.frame")
DF
         x         y
1 18.10000 -150303.5
2 18.16283 -150303.5
3 18.21251 -150303.5
4 18.56595 -150303.5

# Below are the assumed conditions: x > 18.2 and y <= -15:
length(subset(DF, x > 18.2 & y <= -15)) / nrow(DF)
[1] 0.5

#假设数据如下
DF 18.2和y 18.2和y