glm() コマンドを使い、ガンマ回帰分析を行う。一般化線形モデルとして行う。
通常は Excel 等で作成した CSV ファイルを R に読み込んで分析する。しかし、ここでは便宜的に以下の簡単なデータフレームを作成し、data という変数に格納しておく。
data = data.frame(出血量 = c(10,200,300,5,5,3,250,500), 手術方法 = c("内視鏡","開腹","開腹","内視鏡","内視鏡","内視鏡","開腹","開腹"), 手術時間 = c(60,50,60,60,30,40,60,50))
data の内容を確認する。
data
glm() コマンドを使い、ガンマ回帰分析を行う。リンク関数は逆関数が自動的に選択される。
result = glm(出血量 ~ 手術方法 + 手術時間, data=data, family=Gamma) summary(result) #結果の表示
リンク関数を対数関数にしたい場合は以下のようにする。
result = glm(出血量 ~ 手術方法 + 手術時間, data=data, family=Gamma(log)) summary(result) #結果の表示