外部函数错误：外部函数错误

Question

我需要绘制一个家庭作业问题的透视图。我的函数使用两个向量x_dartbrd，y_dartbrd并执行一系列操作来返回与参数长度相同的另一个向量。现在，当我试图运行外部函数为透视图生成z时，它给出了以下错误：

Error in outer(x_dartbrd, y_dartbrd, function(x_dartbrd, y_dartbrd) mapply("DartBoard",  : 
  dims [product 10201] do not match the length of object [1030301]
.

我的代码如下：

x_dartbrd = linspace(-170,170,101) #vector of 1st argument
y_dartbrd = linspace(-170,170,101) #vector of 2nd argument
DartBoard = function(x_dartbrd,y_dartbrd)
{
Some specific operations as per the problem
return(Score) #Score is of the same length as 1st and 2nd arguments
}
z <- outer(x_dartbrd, y_dartbrd,function(x_dartbrd,y_dartbrd)mapply("DartBoard",x_dartbrd,y_dartbrd))

这个外部功能似乎不起作用。 感谢您对此的所有建议。