Rで条件分岐でデータフレームを作成したらエラーがでる

kin<-c(-3,5,7,-6)
kin1<-kin[0<=kin] #0以上
kin2<-kin[0>kin]  #0未満

y<-c(1,2,3,4)

kihon<-data.frame(y) #データフレーム作成

プラスとマイナスを条件分岐で計算

for(i in 1:length(kin){
 if(kin1){
  pu<-data.frame(kin1*10) #プラスの計算
  colnames(pu)<-c("point") #ポイント名の変更
 }
 if(kin2){
  mi<-data.frame(kin2*30) #マイナスの計算
  colnames(pu)<-c("point") #ポイント名の変更
 }
}

pumi<-rbind(pu,mi) #プラスとマイナスのデータを連結
mydata<-data.frame(y,pumi) #データフレーム完成

このようにコードを書くと

There were 50 or more warnings(use warning() to see the first 50)

上記のような赤メッセージが表示されます。

あと、mydataのデータフレームはpumiのマイナスとプラスを分けて別の方法で計算してから、もう一度同じ列に入れなおしているので、yのデータのような1,2,3,4の並びになりません。

データフレームと上の赤メッセージはどのように対処すればよいでしょうか。