功能:求解雅克比theat4函数

格式: JacobiTheta4(z, q)

z : 为数值或矩阵变量
q : 为数值或矩阵变量,q的元素值的绝对值必须小于1

说明:
1. 
$$
\mathbf{JacobiTheta4}(z, q) = 1 + 2\sum_{i=1}^\infty[ (-1)^iq^{i^2} \cos(2iz)
$$
2. q的元素值的绝对值必须小于1,否则将返回非数字.
3. {JacobiTheta4<矩阵运算\JacobiTheta4>}(z, q) = {JacobiTheta3<矩阵运算\JacobiTheta3>}(z - PI / 2, q)

参考:{Jacobi Theta<https://mathworld.wolfram.com/JacobiThetaFunctions.html>}

例子:
a = JacobiTheta4(1.68, 0.23)//回车得到如下结果
a =
[ 1.45414629317822 ]