「統計学関連なんでもあり」の過去ログ--- 047

No.21795　連続変数データをカテゴリーデータに変換するRecode関数　　【松田】　2015/10/07(Wed) 14:47

青木先生

お世話になっております。

先生が作成されたRecode関数がうまく作動しなくなりました。

xs2<-Recode(st1$age,c(20,30,40,50), c("a1","a2","a3","a4","a5"))

と入力すると，

Error in cut(x, breaks = c(-Inf, arg1, Inf), right = FALSE, labels = arg2) :
unused arguments (breaks = c(-Inf, arg1, Inf), right = FALSE, labels = arg2)

と表示されます。

＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊

帰宅して自宅のパソコンで処理するとうまく作動しました。
全く同じデータでかつ同じコードです。

何が原因なのかさっぱり分かりません。
分かる方がいましたら，ご教示ください。
よろしくお願いします。

No.21797　Re: 連続変数データをカテゴリーデータに変換するRecode関数　　【青木繁伸】　2015/10/09(Fri) 10:36

うまく動かなくなったパソコンの R で，cut が別のものになっているのでしょう。
コンソールに cut と入力したとき何が表示されますか？
> cut
function (x, ...)
UseMethod("cut")
<bytecode: 0x7f9127837830>
<environment: namespace:base>
これ以外のものが表示される場合は，その cut を削除しないと動かないでしょう。
Recode だけではなく，本来の cut 関数も動かないはずです。

No.21802　Re: 連続変数データをカテゴリーデータに変換するRecode関数　　【松田】　2015/10/12(Mon) 10:13

青木先生

先生の予想通り，cutと入力すると

function(x)
{
x1<-ifelse(x-25.6 <0,0,x-25.6 )
x2<-ifelse(x-26.2 <0,0,x-26.2 )
x3<-ifelse(x-26.5 <0,0,x-26.5 )
y<-0.546+0.526*x1-1.335*x2+1.0505*x3
y
}

と表示されました。

新たなcut関数が定義されていたようです。

この関数を削除することで，元に戻りました。

ありがとうございました。