Soru Gruplandırılmış frekans serisi için kümülatif frekans serisi hesaplayan bir makro yazma.

[Dilay Seçil]

Birinci argüman frekansların olduğu hücre referansını ve ikinci argüman ise kümülatif frekansı hesaplanacak olan grup satır numarasını karşılamalıdır.

https://r.resimlink.com/hgDI9f.png

Örneğin; 40 şıkkı için kümülatif frekansını hesaplama istemektedir.

 

[Ömer]

Merhaba,

Sorunuz net değil örnek vererek daha detaylı açıklama yapar mısınız.

 

[Dilay Seçil]

Merhaba,

Merhaba Ömer Bey,
Eklemiş olduğum resimdeki gruplandırılmış seriler için kümülatif frekans serisi hesaplayan bir fonksiyon makro yazmam gerekiyor. Makronun iki argümanlı ve birinci argümanın frekansların olduğu hücre referansını vermesi ve ikinci argümanın ise kümülatif frekansı hesaplanacak olan grup satır numarasını karşılaması gerekiyor. Örneğin; 30-40 gözlem aralığına düşen 40 değeri için kümülatif frekansı hesaplama.
Umarım daha açıklayıcı olmuştur. Teşekkür ederim şimdiden.

 

[Ömer]

Tabloya göre 40 değerinin kümülatif frekansı ne olmalı.
Bulunan sonuçun hesaplama mantığı nasıl dır.
Detaylı açıklar mısınız.

 

[Dilay Seçil]

Tabloya göre 40 değerinin kümülatif frekansı ne olmalı.
Bulunan sonuçun hesaplama mantığı nasıl dır.
Detaylı açıklar mısınız.

Belirli bir X değişken değerinin kümülatif frekansı kendisinden küçük veya ona eşit tüm değerlerin mutlak frekanslarının f toplamıdır:
Fn = f1 + f2 + f3 +… Fn
Tüm mutlak frekansları toplayarak, toplam veri sayısı N elde edilir, yani:
F1 + F2 + F3 +…. + Fn = N
∑ Fn = N
yani;
3+4+5+4+9+2=27
10-20 aralığının frekansı 3 ,20-30 aralığının 7 ,30-40 aralığının 12 ,40-50 aralığının 16,50-60 aralığının 25, 60-70 aralığının ise 27 .
60-70 aralığı = 27.

 

[Ömer]

Deneyiniz.

=TOPLA(KAYDIR(E2;;;ARA(40;--SOLDAN(D2:D7;BUL("-";D2:D7)-1);SATIR(D2:D7)-1)))

İstediğiniz bu mu?

 

[Dilay Seçil]

Function frek_seri(seri As Range)
Dim k As Integer, s() As Single, f() As Integer
Dim n As Integer, i As Integer

t = seri.Rows.Count
ReDim s(t), f(t)
With WorksheetFunction
For i = 1 To t
s(i) = .Sum(seri.Columns(1).Cells(i).Value, seri.Columns(2).Cells(i).Value)
f(i) = seri.Columns(3).Cells(i).Value
Next i
frek_seri = .SumProduct(s, a, f)


End Function



Buraya kadar yapabildim. Bu şekilde olması gerekiyor.

 

[Ömer]

Belirli bir X değişken değerinin kümülatif frekansı kendisinden küçük veya ona eşit tüm değerlerin mutlak frekanslarının f toplamıdır:
∑ Fn = N
yani;
3+4+5+4+9+2=27
10-20 aralığının frekansı 3 ,20-30 aralığının 7 ,30-40 aralığının 12 ,40-50 aralığının 16,50-60 aralığının 25, 60-70 aralığının ise 27 .
60-70 aralığı = 27.

Konuyu tam anlayamadığım için net bir yorum yapamıyorum.
Yukarıdaki açıklamanıza göre ve ilk mesajdaki resimde olan D2:E7 aralığındaki verilere bakarak formül yazdım.

Yazdığım formül doğru sonuç vermiyor mu? Aralığa göre 40 değeri 16 rakamını üretiyor. Açıklamanızda da bu şekildeydi?

 

[ÖmerFaruk]

@Dilay Seçil eklediğiniz resim linki silinmiş. Bilginiz olsun.