请各位大神指教啊

代码如下
k<-c(-1,0,0.1,0.2,3,10,9,9,9)
k<-as.data.frame(k)
names(k)<-"value"
for(i in 1:nrow(k)){
  if(k[i,] <= 3){k[i,] <- "bei"}
}
k

输出结果怎么不对呢？
输出结果应该是中第6项，也就是原来数据框中是10的哪一项应该是继续输出10，但是为什么我的输出结果是如下
value
1   bei
2   bei
3   bei
4   bei
5   bei
6   bei
7     9
8     9
9     9

我到底哪里出错了？