我已经生成了100个（0,1）区间上的均匀分布，然后我设定小于0.3的定位1,0.3到0.9定值为2,0.9到1定值为3，然后我写了一段程序。结果出来的说是空值。请各位大大帮我看看哪里出现了问题可以么？
程序如下
> DJ<-function(x1){
+     for(i in 1:100){
+    if (x1[i]<=0.3){
+        x1[i]<-1
+    }else if (x1[i]<=0.9){
+        x1[i]<-2
+    }else
+        x1[i]<-3
+ }
+ }

谢谢大家了。