Как бы вы рассчитали выборку из 30 наблюдений в этом сценарии?

Question

let

T1 = 2log (x̅) -1

T2 = log (мин (X1 ... Xn) * макс (X1. .Xn))

Я хочу вычислить T1 и T2 для n = 30. Я думаю об использовании для l oop для T1, но я почти уверен, что есть более простой способ для этого. вот моя попытка, я действительно не знаю, как go о T2, чтобы быть честным.

#calculating T1
    sum=0
    for (i in 1:30)
    {
     b=x*i
    sum=sum+b
    }
    sum
    T1=2*log(1/30*b)-1
    T1

Answer 1

Если вам нужны более эффективные подходы, возможно, вы можете попробовать приведенный ниже код для T1 и T2

T1 <- 2*log(mean(X))-1
T2 <- log(prod(range(X)))

или

T2 <- sum(log(range(X)))

Answer 2

А как насчет функции карты?

map_dbl ()

Может работать лучше