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