机器能坚持 X 天的概率

一家工厂新到一台机器。这类机器非常不可靠：每天都有 10% 的概率永久损坏。您预计它能用多久？

注意，这可由几何分布的累积分布来描述，因此可使用 pgeom() 函数。pgeom(X, .1) 表示机器在损坏之前有 X 个工作日的概率（也就是在第 X + 1 天损坏的概率）。