Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/79.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
参数化索引求和的R命令_R - Fatal编程技术网

参数化索引求和的R命令

参数化索引求和的R命令,r,R,我试图在R中创建一个函数,所以我命令 f <- function(d,r,k) { A <- d^(r-1) B <- **summation over i going from r to (k-1)**d^2i return (A+B) } f如果我理解正确(d、r和k都是标量),您想要的是: f = function(d,r,k) { A = d^(r-1) B = sum(d^(2*(r:(k-1)))) (A+B) } 基本上:

我试图在R中创建一个函数,所以我命令

f <- function(d,r,k) {
    A <- d^(r-1)
    B <- **summation over i going from r to (k-1)**d^2i
    return (A+B)
}

f如果我理解正确(d、r和k都是标量),您想要的是:

f = function(d,r,k) {
  A = d^(r-1)
  B = sum(d^(2*(r:(k-1))))
  (A+B)
}
基本上:

r:(k-1)
扩展成一个整数列表,从
r
k-1
,因此
d^(2*(r:(k-1))
d^2i
的列表。在列表上调用
sum()
,就可以得到元素的总和

这一切都可以浓缩为:

f = function(d,r,k) {
  d^(r-1) + sum(d^(2*(r:(k-1))))
}

为了可读性,我编辑了你的准代码。你能提供一个例子说明
d
r
k
以及你期望的例子吗?应该是
r:(k-1)
,因为
比二进制
-
运算符具有更高的优先级。