統計解析プログラムのバグについて

(問題点)

 統計計算後にデータがソーティングされてしまう.

(解消方法)

 メディアン(中央値)計算時のソーティングが原因.
 ソーティングに用いる配列とデータの配列とを別にする.Function Medianを以下のように変える.
FUNCTION Median (a() AS SINGLE, dn AS INTEGER)
        DIM atmp(dn) AS SINGLE
        DIM MinN AS INTEGER

        FOR n = 1 TO dn
            atmp(n) = a(n)
        NEXT

        'Sort
        FOR n = 1 TO dn - 1
                MinN = n
                FOR m = n + 1 TO dn
                        IF atmp(m) < atmp(MinN) THEN
                                MinN = m
                        END IF
                NEXT
                SWAP atmp(n), atmp(MinN)
        NEXT

        'Calc Median
        IF dn MOD 2 = 0 THEN
                Median = (atmp(dn \ 2) + atmp(dn \ 2 + 1)) / 2
        ELSE
                Median = atmp(dn \ 2 + 1)
        END IF
        ERASE atmp
END FUNCTION


 

レポート課題

比較できる2つ以上の変量について,それぞれの基本統計量を求め,考察しなさい.
 (例えば1966年から1995年の1月,7月の平均気温をデータとし,それぞれについて統計量を求めるなど)

メールにて提出すること.期限1月12日(火) 
 提出先:makarepo@mail.sp.myu.ac.jp
 件名:pc21
 メール内には,求めた基本統計量を示すとともに,その基となったデータをに示すこと(メール末尾で構わない).
  また,メール内に学籍番号,名前を明記すること.