R

Question

R中的复数定义为：

function (length.out = 0L, real = numeric(), imaginary = numeric(), modulus = 1, argument = 0)

我的程序旨在处理真实案例和复杂案例中的多个精确值。 R不直接支持多个精度。安装Rmpfr包后，我可以定义多个精度值，并使用新的mpfr objects使用常规函数。

TestFunc <- function(a, b){
    seq(a, b, length.out = 3)
}

>TestFunc(mpfr(1, 120), mpfr(2, 120))
[1]                                       1
[2] 1.1666666666666666666666666666666666662
[3] 1.3333333333333333333333333333333333338
[4]                                     1.5
[5] 1.6666666666666666666666666666666666677
[6] 1.8333333333333333333333333333333333338
[7]                                       2

我有处理复数的函数。

问题： 我不能打电话

complex(real=mpfr(1, 120), imaginary=mpfr(1,120))

因为，复杂的函数定义要求它们只有双精度。

有没有办法在R中使用多个精度进行复数运算？