サクサク読めて、アプリ限定の機能も多数!
トップへ戻る
Nintendo Direct
sugi-shun.com
概要:このページでは、「かなり基本的なコマンドなので、特にマニュアルにも載らないが、知っているといろいろ便利な小技を集める」ということをスローガンとします。 親ページ:このページの親ページはRです。 行列からNAを取り除く † 数値(整数4桁、小数3桁)からなるデータフレーム、またはマトリックス中にデータが無いことを示す「NA」が行中、または列中の特定箇所に含まれてしまっている様な場合、その「NA」を含む、行、列を除き、「NA」を含まない、純粋な数値からなるデータフレーム、またはマトリックスを抽出したい. > # 例を作る > x <- matrix(1:30, 5, 6) > x[1,2] <- x[3,4] <- x[4, 6] <- NA > x [,1] [,2] [,3] [,4] [,5] [,6] [1,] 1 NA 11 16 21 26 [2,] 2 7 12 17 22
どうやったらいいかとというと、以下の関数を使います。 q.growth <- function(x) { n <- length(x) x1 <- x[-(1:4)] x4 <- x[-((n-3):n)] z1 <- (x1-x4)/x4*100 z1 } この関数をつかって、 > q.growth(INV)->I > q.growth(GDE)->Y と入力すれば、四半期の対前年同期比伸び率データをつくれます。 さて次に単回帰分析してみましょう。その前に、それぞれの変数のサンプルサイズをそろえないといけません。 > length(R) [1] 109 > length(I) [1] 105 という結果からもわかるとおり、このままだと変数ごとに長さが違ってしまうので、回帰分析できません(被説明変数と説明変数は、同じデータ数でないと回帰分析できません)。 > R[5:length(R)]-
Please visit here for the time being... とりあえず、こちらをクリックしてください・・・
このページを最初にブックマークしてみませんか?
『sugi-shun.com』の新着エントリーを見る
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く