Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/65.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_Function_Cumulative Sum - Fatal编程技术网
Fatal编程技术网
  • r/
  • R 构建一个累积和大于或等于某个常数的函数

R 构建一个累积和大于或等于某个常数的函数

r function

R 构建一个累积和大于或等于某个常数的函数,r,function,cumulative-sum,R,Function,Cumulative Sum,我有一个有n个元素的向量。元素之和为1。我想要一个函数，将向量作为输入，返回向量元素的数量，使它们的和大于或等于0.80。 例如，考虑以下向量： A <- as.matrix(c(0.5, 0.2, 0.15, 0.10, 0.05)) A=0.80 csum_index <- function(v, t=0.8) which(cumsum(v) >= t)[1] csum_index(A) #[1] 3 csum_index(A,0.9) #[1] 4

我有一个有n个元素的向量。元素之和为1。我想要一个函数，将向量作为输入，返回向量元素的数量，使它们的和大于或等于0.80。 例如，考虑以下向量：

A <- as.matrix(c(0.5, 0.2, 0.15, 0.10, 0.05)) 

A=0.80


csum_index <- function(v, t=0.8) which(cumsum(v) >= t)[1]



csum_index(A)
#[1] 3
csum_index(A,0.9)
#[1] 4