自由度調整済み決定係数ぐらい異なるかもしれないと思っていましたが、それすら同じでした。最初から変数同士の掛け算を入れた変数を用意できるなら、そうやるほうがいいような気がします。これだと、Rで、コメント数とコメント数とマイリスト数を掛けた値のみの重回帰分析というのも簡単にできるので(自分がやり方を知らないだけだとは思いますが)。amyu2TweetPocketRを使って重回帰分析をして、summary関数で重回帰分析に関する情報が見れるとわかったものの、『係数だけ』『自由度調整済み決定係数だけ』がほしい。思って取得方法をいろいろ調べてみました。例によって、使うのは下記のニコ動からのデータ。2.2e-16上記は、コメント数とマイリスト数とカテゴリーを説明変数にして、再生数を目的変数とした重回帰分析の結果。係数lmオブジェクトの後に『$coefficients』、もしくは『[“coefficients”]』、coef(coefficients)関数を用いても取得できる。-3.825806e+05一つ一つを取得したい場合は、後ろに『[“”]』でくくって、中に変数名をいれる。resid(nico.lm)[1]15883875lmオブジェクトを引数にしたsummary関数で表示されるような四分位数を取得したい場合は、上記の記述をsummary関数の引数とする。32自由度(標本数から説明変数(切片含む)の数を引いたもの)$df.residualをつける。8968カテゴリー変数の値$xlevelsをつける。"R-18"これを、”category”という文字列(もしくは、その文字列をいれた変数)から取得したいのだけどやりかたが分からない。nico.lm[“category”][1]では取得できないようだし。data.frame関数通したらできるようではあるのだけど。"R-18"まわりくどい。自分が知らないだけで、何かいいやり方があると思うのだけど。255028.7解析に使用したデータのみのモデル$modelをつける。summary(nico.lm)$coefficients[,"Pr(>|t|)"]["(Intercept)"](Intercept)2.1918e-114他にもいろいろあるようですが、自分が必要になりそうなもののみ列挙しました。ここに書いてあるのはネットや書籍で調べたわけではなく、names関数を使って調べて行った結果、分かった方法です。"Pr(>|t|)"names関数、すごい便利です。世界一のアニメーション企業の今まで語られなかったお金の話(ブクログレビュー)当サイトは以下のサービス、ツールによって運営されています。