SPF.tsmeとRBF.tsmeを更新しました。
使用方法は:
SPF.tsme(分散分析の結果、データ名、従属変数名)
RBF.tsme(分散分析の結果、データ名、従属変数名)
具体例は以下の通りです。
なお、これらを使用する前に
source(“http://peach.l.chiba-u.ac.jp/course_folder/tsme.txt”)
を必ず実行してください。
source("http://peach.l.chiba-u.ac.jp/course_folder/tsme.txt") # SPFの例 dat<-read.csv("http://www.matsuka.info/data_folder/dktb3211.txt") dat.aov<-aov(result~method*duration+Error(s+s:duration),dat) tsme <- SPF.tsme(dat.aov, dat, "result") simple main effect test for BETWEEEN subject factor ss df ms f p 1hr 2.5 1 2.5 1.0417 0.3150887 2hr 0.4 1 0.4 0.1667 0.6858104 3hr 12.1 1 12.1 5.0417 0.0317831 4hr 32.4 1 32.4 13.5000 0.0008662 residual 76.8 32 2.4 Tukey HSD test - between subject factor @ duration = 3hr D E D FALSE TRUE E TRUE FALSE Tukey HSD test - between subject factor @ duration = 4hr D E D FALSE TRUE E TRUE FALSE simple main effect test for WITHIN subject factor ss df ms f p D 49.2 3 16.4000 12.990 3.047e-05 E 1.0 3 0.3333 0.264 8.506e-01 residual 30.3 24 1.2625 Tukey HSD test - within subject factor @ method = D 1hr 2hr 3hr 4hr 1hr FALSE FALSE TRUE TRUE 2hr FALSE FALSE FALSE TRUE 3hr TRUE FALSE FALSE FALSE 4hr TRUE TRUE FALSE FALSE # RBFの例 dat<-read.csv("http://www.matsuka.info/data_folder/dktb3218.txt") dat.aov<-aov(result~method*duration+Error(s+s:duration+s:method),dat) tsme <- RBF.tsme(dat.aov, dat, "result") simple main effect test for the 1st within-subject factor ss df ms f p 1hr 2.5 1 2.5 1.563 0.2292743 2hr 0.4 1 0.4 0.250 0.6238816 3hr 12.1 1 12.1 7.562 0.0142341 4hr 32.4 1 32.4 20.250 0.0003635 residual 25.6 16 1.6 Tukey HSD test - 1st within-subject factor @ duration = 3hr D E D FALSE TRUE E TRUE FALSE Tukey HSD test - 1st within-subject factor @ duration = 4hr D E D FALSE TRUE E TRUE FALSE simple main effect test for the 2nd within-subject factor ss df ms f p D 49.2 3 16.4000 12.990 3.047e-05 E 1.0 3 0.3333 0.264 8.506e-01 residual 30.3 24 1.2625 Tukey HSD test - 2nd within-subject factor @ method = D 1hr 2hr 3hr 4hr 1hr FALSE FALSE TRUE TRUE 2hr FALSE FALSE FALSE TRUE 3hr TRUE FALSE FALSE FALSE 4hr TRUE TRUE FALSE FALSE