R语言 | 复数 相关函数
问题
大家好，我有一个问题，我看到一个函数如下：
L2_distance <- function(A, B){rowA <- apply(A*A, 1, sum)matrixA <- matrix(rep(rowA, each=length(rowA)), nrow=length(rowA), byrow=T)rowB <- apply(B*B, 1, sum)matrixB <- matrix(rep(rowB, each=length(rowB)), nrow=length(rowB), byrow=F)C <- 2 * A %*% t(B)dis <- Re(matrixA + matrixB - C)
}
请问倒数第二行Re的作用是什么
解答
查文档：返回复数的实部
测试 示例
> Re
function (z) .Primitive("Re")
> ?Re
> a1=1:2 + 1i*(8:9)
> a1
[1] 1+8i 2+9i
> Re(a1)
[1] 1 2
> Re(5+1i*10)
[1] 5
>
