在R中构建函数后，当Print()工作时，Return()不工作

在R中构建函数后，当print()工作时，return()不工作的原因是因为print()函数会将结果输出到控制台，但不会将结果返回给函数的调用者。而return()函数则是用于将结果返回给函数的调用者。

在R中，当函数执行到return()语句时，会立即停止函数的执行，并将return()语句后面的表达式作为函数的返回值。但如果在函数中使用了print()函数来输出结果，那么print()函数会将结果输出到控制台，但不会影响return()函数的执行。

为了解决这个问题，可以将需要返回的结果保存在一个变量中，然后在函数的最后使用return()函数将结果返回给函数的调用者。例如：

my_function <- function() {
  result <- 10 + 20
  print(result)  # 输出结果到控制台
  return(result)  # 返回结果给函数的调用者
}

output <- my_function()  # 调用函数并将返回值保存在output变量中

在上述例子中，函数my_function()计算10 + 20的结果，并使用print()函数将结果输出到控制台。然后使用return()函数将结果返回给函数的调用者，并将返回值保存在output变量中。

需要注意的是，如果在函数中使用了print()函数来输出结果，那么在函数的调用时，会先输出结果到控制台，然后再将结果返回给函数的调用者。