Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/73.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
低延迟R提交_R - Fatal编程技术网

低延迟R提交

低延迟R提交,r,R,我已经创建了一些R代码,它们接受csv并生成和输出,现在我通过以下方式调用它们: Rscript code.R input.csv 这里code.R是要执行的代码,input.csv是它用作输入的文件 问题: 该脚本需要5秒或更长的时间来生成结果,这是因为从shell调用R,所以加载库需要时间 问题: 是否可以在后台运行R,或者将R作为一个服务,加载所有库,我只需提交我的作业,就可以进行计算 全面披露: 脚本是一个ML模型,它加载一个.RDA对象,脚本调用predict函数 打开R控制台并运行

我已经创建了一些R代码,它们接受csv并生成和输出,现在我通过以下方式调用它们:

Rscript code.R input.csv
这里code.R是要执行的代码,input.csv是它用作输入的文件

问题:

该脚本需要5秒或更长的时间来生成结果,这是因为从shell调用R,所以加载库需要时间

问题:

是否可以在后台运行R,或者将R作为一个服务,加载所有库,我只需提交我的作业,就可以进行计算

全面披露:

脚本是一个ML模型,它加载一个.RDA对象,脚本调用predict函数

  • 打开R控制台并运行/加载所需的所有库
  • 现在使用
    source()
    运行R脚本
  • Test.R文件具有以下代码

    #This file has no library declarations
    c <- ggplot(mtcars, aes(factor(cyl)))
    c <- c + geom_bar()
    print(c)
    
    现在从控制台:

    > commandArgs <- function() c('a','b')
    > source("<Path>/test.R")
    [1] "a" "b"
    (Along with the graph)
    
    >commandArgs源(“/test.R”)
    [1] “a”“b”
    (连同图表)
    
    我想要一种可以自动化的方法。这需要打开控制台,我怀疑我是否能将参数传递给它!,如果可以的话,我很感兴趣
    c <- ggplot(mtcars, aes(factor(cyl)))
    c <- c + geom_bar()
    print(c)
    print(commandArgs())
    
    > commandArgs <- function() c('a','b')
    > source("<Path>/test.R")
    [1] "a" "b"
    (Along with the graph)