R规划中的和函数

在R中，有一个向量，像x=3:100

我想编写如下函数：

sum ( (x/a)^2t)  - 5 

如果我选择t的任何值，就会得到答案

例如：

Func= function ( t ) {
x=c(1:100)
a= min(x)
Sum ( x / a )^2t - 5 
}

我不知道这是否正确

---

如果我想通过割线方法得到函数的根呢。我在R中使用

library（NLRoot）

，但我编写的代码不正确

library(NLRoot)
curve(func, xlim=c(0,3), col='blue', lwd=1.5, lty=2,xlab="x",ylab="f(x)")

---

输出是代码中的写入错误。

这里只是一个语法更正

Func <- function(t) {
  x <- c(1:100)
  a <- min(x)
  sum((x / a)^(2 * t)) - 5
}

---

1） 是

x=3:100

还是

x=1:100

？2） 在

x=c（1:100）

中，对函数

c（）

的调用是多余的，请将其删除。3） R区分大小写，您缺少乘法运算：

sum（（x/a）^（2*t））-5

。是x=1:100。谢谢。如果我想用割线法求函数的根呢。我在R中使用库（NLRoot）。但我编写的代码不正确。谢谢，如果我想通过割线方法获得函数的根，该怎么办。我在R中使用库（NLRoot）。但我编写的代码不正确。@Majid抱歉，我不知道如何解决这个问题root@Majid请参阅我编辑的关于查找根的答案

Func <- function(t, x = 1:100) sum((x / min(x))^(2 * t)) - 5

> uniroot(Func, interval = c(-5, 5))
$root
[1] -0.5091492

$f.root
[1] -0.0003913713

$iter
[1] 13

$init.it
[1] NA

$estim.prec
[1] 6.103516e-05