1/2 毎日ずっとひだまりのなかでねてたい

Rのpasteで空白が入っちゃうのを防ぐ

http://cse.naro.affrc.go.jp/takezawa/r-tips/r/17.html

このHPの例みたいに

paste("May I", "help you ?")
[1] "May I help you ?

"May I"と"help you ?"との間に空白が入るのは，多分区切り文字のデフォルトが半角スペースになっているから．これがいやだっていうときは，

paste("May I", "help you ?", sep ="")

引数で区切り文字の指定を何にもなしにすればOK．

rbindのコラム名が違うとエラーになる話

「names do not match previous names」というやつ．

これ，超微妙な違いでもダメなので，ほかのとこでdata.frameでくっつけたデータを使おうとしたりすると，そのデータ名が列名にくっついていてrbindで扱えなくなったりする．たとえば，

data <- data.frame(D1 = data1, D2 = data2)

datanew <- data.frame(D3 = data3, D4 = data4)

とかすると，多分列名にD1.緯度とかD2経度みたいにデータ名がついちゃったりすることがあり，コラム名が違うものになってしまう．

そこで，コラム名を変えてそろえてしまえばrbindが使えますという話．

http://cse.naro.affrc.go.jp/takezawa/r-tips/r/26.html

これはたぶん万能．

names(datanew) <- names(data)

とかすればOK（コラム名が同じデータかどうかは確認すること）．

もしくは，もっと単純なケースで，for文で同じものを繰り返しくっつけていくのにrbindを使いたくて…くっつけていく元のデータは存在しなくて…でも新しく定義するのはめんどくさくて…みたいなときは，初期値をNULLにしておけば解決．

matA <- matrix(1:6, ncol = 3, nrow = 2)
matSum <- rbind(matSum, matA) #matSumが見つからないというエラーが出ます

#まとめ用のオブジェクトをNULLで定義しておく
matSum <- NULL
matA <- matrix(1:6, ncol = 3, nrow = 2)
matSum <- rbind(matSum, matA) #エラーを出しません

webbeginner.hatenablog.com

rbindの「不正な因子基準」

「In `[<-.factor`(`*tmp*`, ri, value = c(○○): 不正な因子水準です。NAが発生しました」

rbindは便利なようで意外とよくわからないエラーが出る．笑

hoge <- rbind(hoge1, sapply(hoge2, as.character))
数値型のデータに文字型をアペンドする事は可能だが，文字型のデータに数値型などのデータをアペンドすると「In `[<-.factor`(`*tmp*`, ri, value = c(○○): 不正な因子水準です。NAが発生しました」という（それを読むだけでは意味の良くわからない）警告が出て，数値が<NA>に書き換えられてしまう．それを避けるためにも型が混ざっているようなデータの場合は，「rbind」の二つ目の引数に「sapply(引数, as.character)」をつけていた方がいいだろう．