3

我试图使用log然后使用exp,但这只有在我处理产品或部门时才有意义。人们通常会定义

Euclidean_Norm <- function(x) sqrt(sum(x^2))

但我无法处理上溢/下溢。我正在考虑实施

Euklidean_Norm2 <- function(x) log(exp(sqrt(sum(x^2))))

如果我举个例子

c(34212432, 21343210940, 5412359103) 

我得到InfEuklidean_Norm2Euklidean_Norm但不起作用。但它应该可以在 R 中表示,因为

sqrt(34212432^2 + 21343210940^2 + 5412359103^2)
[1] 22018797760

我正在寻找一种方法来避免这种溢出。我会很感激任何提示。

4

0 回答 0