Top > 遠征

遠征

Last-modified: 2014-09-16 (火) 14:35:04
 

運とバケツ率の関連性 Edit

現在、下記で行われた遠征における運とバケツ率の関連性について追検証中です。
結果、有意差は認められませんでした。

> baketsu <- na.omit(csv[(csv[, '遠征名'] == '長距離練習航海') & (csv[, '旗艦運'] >= 40), 'バケツ']);
> setwd('C:/Users/Biikame/Downloads');
> csv <- read.csv('遠征.csv');
> baketsu <- na.omit(csv[(csv[, '遠征名'] == '長距離練習航海' | csv[, '遠征名'] == '対潜警戒任務') & (csv[, '旗艦運'] >= 40), 'バケツ']);
> 
> binom.test(sum(baketsu), length(baketsu), p = 0.5);

    Exact binomial test

data:  sum(baketsu) and length(baketsu)
number of successes = 274, number of trials = 514, p-value = 0.1454
alternative hypothesis: true probability of success is not equal to 0.5
95 percent confidence interval:
 0.4888861 0.5768793
sample estimates:
probability of success 
             0.5330739 

リンク Edit

コメント Edit

コメントはありません。 遠征/コメント?

お名前: URL B I U SIZE Black Maroon Green Olive Navy Purple Teal Gray Silver Red Lime Yellow Blue Fuchsia Aqua White