如何根据情况创建data.frame？

Question

我正在尝试创建一个data.frame。我有一个for循环，但我认为有一些遗漏的东西。我是一个没有编程语言背景的初学者，所以我真的需要帮助。

random_number=c(0.78,0.43,0.93,0.87,0.48,0.84,0.87,0.27,0.20,0.52)

random_number

day=c(1:10)

day

A <- random_number

demand <- function(A){
  for (a in A) {
    if(a<0.080 && a>0){
      print("15")
    }
    else if(a<0.240 && a>0.080){ 
      print("16")
    } else if(a<0.576 && a>0.240){
      print("17")
    } else if(a<0.824 && a>0.576){
      print("18")
    } else if(a<0.920 && a>0.824){
      print("19")
    } else if(a<1.000 && a>0.920){
      print("20")
    }
  }
}

demand(A)

因此生成了我想要的结果：

然后，我尝试创建一个结合日期，随机数和需求的data.frame。

w <- demand(A)

new_data <- data.frame(day,random_number,w)

但显示错误：

我要做的就是产生以下结果：

请帮助我！我知道这是分配的。但请帮助我。谢谢！！