查找给定基础和产品的功效值

Question

这可能很简单，但我想不出一种方法来获得功效值。

list(c(2,32),c(4,64),c(7,343))

预期结果是

c(5,3,3)

Answer 1

基本R解决方案

sapply(x, function(x) log(x[[2]], x[[1]]))

Answer 2

使用purrr的映射：

tmp <- list(c(2,32),c(4,64),c(7,343))
purrr::map_dbl(tmp, ~log(.x[2], base = .x[1]))
[1] 5 3 3

每个@akrun关于向量化的建议：

m1 <- do.call(rbind, tmp);log(m1[,2], m1[,1])

应该注意，它的运行速度也相当快！