r - 文字ごとにデータフレームを置き換える

Question

一部の値を次の文字に置き換えると、data[data<0] <- "Down"すべてdata[data>0] <- "Up"の値が「上」になりますが、置換を逆にすると、好きなように機能します。

data<-runif(30, min=-5, max=5)
data[data<0]<-"Down"
data[data>0]<-"Up"
#[1] "up" "up" "up" "up" "up" "up" "up" "up" "up" "up" "up" "up" "up" "up" "up"
#[16] "up" "up" "up" "up" "up" "up" "up" "up" "up" "up" "up" "up" "up" "up" "up"

しかし、これを行うと正しい結果が得られます:

data<-runif(30, min=-5, max=5)
data[data>0]<-"Up"
data[data<0]<-"Down"
#[1] "down" "up"   "up"   "down" "down" "down" "down" "down" "down" "down"
#[11] "down" "down" "up"   "down" "down" "down" "up"   "up"   "down" "up"  
#[21] "up"   "down" "up"   "up"   "down" "down" "up"   "up"   "down" "down"

解決策は簡単で、2 番目の方法を実行しますが、なぜこれが起こるのか興味があります。最初は文字変換に関係するものかと思っていたのですが、シーケンスを変えても影響がないか、同じように影響するので、そうではありません。何か案が？