计算列表中值的导数

Question

我有一个函数，比如 f = f(x)

我有一个 x 值列表。 q只是数据列表

我希望为我拥有的所有 x 值创建一个值为 f'(x) 的新列表。

f = sqrt(x)
xt = ts(q)
count = length(xt)
f' = rep(0,count)
for (k in 2:count){
    f'[k] = D(f,"x")[k]
    }

这是行不通的。有人可以帮忙吗？

Answer 1

你可以做到

  d<-D(substitute(sqrt(x)),"x")
x<-1:5 #if u have a list use unlist example x<-list(1,2,3) x<-unlist(x)
eval(d)

诀窍是你必须传递一个表达式，如果你做类似

f=sqrt(x)，R 将计算 sqrt(x) 的值，如果您没有定义 x（无论如何都不是您想要的）。你必须传递一个表达式并替换只是不评估。您想在计算导数后求值。

Calculating derivative at values in a list