r - 尝试在光谱密度方程上应用非函数

Question

我正在尝试使用 R 找到 MA(2) 模型的谱密度。这是我想出的公式，但 R 告诉我存在“尝试应用非功能”错误。找不到我哪里出错了。帮助。

specdensity=
(sigma^2 + ((theta1^2)*(sigma^2))+
((theta2^2)*(sigma^2))+
2(theta1*(sigma^2)+(theta1*theta2*sigma^2))*(cos(2*pi*omega))+
2((theta2*sigma^2)*(cos(4*pi*omega))))

还定义了 sigma、theta1、theta2 和 omega。我的错误在哪里？谢谢你。