Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/jquery-ui/2.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_Rows_Doparallel - Fatal编程技术网

R 行或列上的操作

R 行或列上的操作,r,rows,doparallel,R,Rows,Doparallel,我有一个在R中运行的操作,我想知道是否有任何规则集可以帮助我确定是否要在行或列上执行该操作,因为转置矩阵是编程首选项的问题,否则 到目前为止,我唯一的常规建议是:每次在子样本上测试它。我们能在任何方面做得比这更好吗,比如说:分裂比分裂更广泛更好?如果我们不能做得更好,为什么不呢 我已将我感兴趣的具体操作编程如下,但请记住,我更感兴趣的是一般操作,而不是具体操作: 支持:我正在调查某个矩阵。它是,(N)x(K选择N)。K>50,N>4 fz():由多个变量、多项式、最大值和最小值组成的平淡函数 f

我有一个在R中运行的操作,我想知道是否有任何规则集可以帮助我确定是否要在行或列上执行该操作,因为转置矩阵是编程首选项的问题,否则

到目前为止,我唯一的常规建议是:每次在子样本上测试它。我们能在任何方面做得比这更好吗,比如说:分裂比分裂更广泛更好?如果我们不能做得更好,为什么不呢

我已将我感兴趣的具体操作编程如下,但请记住,我更感兴趣的是一般操作,而不是具体操作:

支持:我正在调查某个矩阵。它是,(N)x(K选择N)。K>50,N>4

fz():由多个变量、多项式、最大值和最小值组成的平淡函数

fz<-function(z,vec_l){ 
  if(z%in%vec_l){ #find if z is eqivilant to any number, return 0
    out<-0
  } else if(z>max(vec_l)){
    out<-z^2*max(vec_l)^2
  } else {
    out<-z^2+min(vec_l)^2
  }
  out
}

registerDoParallel(cl)
system.time(
payoff<-foreach(y=1:n, .combine='cbind') %:%  
  foreach(x=1:ncol(support_n), .combine='c')  %dopar% {
    fz(support_n[y,x],support_n[-y,x])
  }
)
fz