R'de kesilmiş ortalama nasıl hesaplanır (örneklerle)

Kırpılmış ortalama, veri kümesindeki en küçük ve en büyük değerlerin belirli bir yüzdesinin çıkarılmasından sonra hesaplanan bir veri kümesinin ortalamasıdır.

Örneğin, %10’luk kırpılmış ortalama, değerlerin en küçük %10’u ve en büyük %10’u çıkarıldıktan sonra bir veri kümesinin ortalamasını temsil eder.

R’de kırpılmış ortalamayı hesaplamanın en basit yolu aşağıdaki temel sözdizimini kullanmaktır:

 #calculate 10% trimmed mean
mean(x, trim= 0.1 )

Aşağıdaki örnekler, pratikte kırpılmış bir ortalamayı hesaplamak için bu fonksiyonun nasıl kullanılacağını göstermektedir.

Örnek 1: Vektörün Kırpılmış Ortalamasını Hesaplayın

Aşağıdaki kod, bir veri vektörü için %10’luk kırpılmış ortalamanın nasıl hesaplanacağını gösterir:

 #define data
data = c(22, 25, 29, 11, 14, 18, 13, 13, 17, 11, 8, 8, 7, 12, 15, 6, 8, 7, 9, 12)

#calculate 10% trimmed mean
mean(data, trim= 0.1 )

[1] 12,375

%10’luk düzeltilmiş ortalama 12.375’tir .

Bu, değerlerin en küçük %10’u ve en büyük %10’u veri kümesinden çıkarıldıktan sonra veri kümesinin ortalamasıdır.

Örnek 2: Veri çerçevesindeki sütunun kırpılmış ortalamasını hesaplayın

Aşağıdaki kod, bir veri çerçevesindeki belirli bir sütun için %5’lik kırpılmış ortalamanın nasıl hesaplanacağını gösterir:

 #create data frame
df = data. frame (points=c(25, 12, 15, 14, 19, 23, 25, 29),
                assists=c(5, 7, 7, 9, 12, 9, 9, 4),
                rebounds=c(11, 8, 10, 6, 6, 5, 9, 12))

#calculate 5% trimmed mean of points
mean(df$points, trim= 0.05 )

[1] 20.25

“Puan” sütunundaki değerlerin %5 kırpılmış ortalaması 20,25’tir .

Bu, %5 en küçük ve %5 en büyük değerlerin çıkarılmasından sonraki “puan” sütununun ortalamasıdır.

Örnek 3: Birden fazla sütunun kırpılmış ortalamasını hesaplama

Aşağıdaki kod, bir veri çerçevesindeki birden çok sütun için %5’lik kırpılmış ortalamanın nasıl hesaplanacağını gösterir:

 #create data frame
df = data. frame (points=c(25, 12, 15, 14, 19, 23, 25, 29),
                assists=c(5, 7, 7, 9, 12, 9, 9, 4),
                rebounds=c(11, 8, 10, 6, 6, 5, 9, 12))

#calculate 5% trimmed mean of points and assists
sapply(df[c(' points ', ' assists ')], function (x) mean(x, trim= 0.05 ))

 assist points 
  20.25 7.75 

Sonuçtan şunları görebiliriz:

• “Puan” sütununun %5’lik kırpılmış ortalaması 20,25’tir .
• “Asist” sütununun %5’lik kısaltılmış ortalaması 7,75’tir .

İlgili: R’de application(), lapply(), sapply() ve tapply() için bir kılavuz

Ek kaynaklar

Aşağıdaki eğitimler kırpılmış ortalamalar hakkında ek bilgi sağlar:

Kesilmiş Ortalamanın Manuel Olarak Hesaplanması
Python’da kırpılmış ortalama nasıl hesaplanır
Kesilmiş Ortalama Hesaplayıcı