R 如何解有求和的方程？

我将方程

和（（2*x+1）/k^x）=3*k

（其中x属于整数）解为

它返回

TRUE

---

但是我想要一个自动解决它的方法，我应该如何解决它？

您可以尝试函数

uniroot

：

uniroot(function(k){sum((2*x+1)/k^x)-3*k}, c(0,100))$root
#[1] 2.000019

uniroot(function(k){sum((2*x+1)/k^x)-3*k}, c(1,10))$root
#[1] 2

---

同样在第一次调用中，可能由于数字表示，您没有得到确切的

2

，因此您可能需要添加一个容差；有关此主题的更多信息，请参阅。

很好，我可以将x扩展到无穷大吗？@HemantRupani到

Inf

你的意思是？我不这么认为，但这可能取决于您的计算机（同样，由于x的“上限”是非常大的数字，因此计算根可能需要很多时间）

uniroot(function(k){sum((2*x+1)/k^x)-3*k}, c(0,100))$root
#[1] 2.000019

uniroot(function(k){sum((2*x+1)/k^x)-3*k}, c(1,10))$root
#[1] 2