Boxplot-scatterplot error-RKward

local({
## Prepare
## Compute
## Print result
data_list <- list (test[["MeJA"]])      #convert single sample variables to list
rk.header ("Boxplot", list ("Variable(s)", rk.get.description (test[["MeJA"]], paste.sep=", ")))
rk.graph.on()
try (boxplot (data_list, notch = FALSE, outline = TRUE, horizontal = FALSE)) #actuall boxplot function
rk.graph.off ()
})
.rk.rerun.plugin.link(plugin="rkward::box_plot", settings="mean.state=\nnames_exp.text=names (x)\nnames_mode.string=default\nnotch.state=FALSE\norientation.string=FALSE\noutline.state=TRUE\nplotoptions.add_grid.state=0\nplotoptions.asp.real=0.00\nplotoptions.main.text=\nplotoptions.pointcolor.color.string=\nplotoptions.pointtype.string=\nplotoptions.sub.text=\nplotoptions.xaxt.state=\nplotoptions.xlab.text=\nplotoptions.xlog.state=\nplotoptions.xmaxvalue.text=\nplotoptions.xminvalue.text=\nplotoptions.yaxt.state=\nplotoptions.ylab.text=\nplotoptions.ylog.state=\nplotoptions.ymaxvalue.text=\nplotoptions.yminvalue.text=\nsd.state=\nx.available=test[[\\\"MeJA\\\"]]", label="Run again")
.rk.make.hr()
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: local ... eval -> eval -> eval -> eval -> rk.header -> sink -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: .rk.cat.output -> cat -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: rk.print.literal -> cat -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
An unspecified error occurred while running the command.
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: .rk.rerun.plugin.link -> .rk.cat.output -> cat -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: .rk.cat.output -> cat -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: rk.print.literal -> cat -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
An unspecified error occurred while running the command.
local({
## Prepare
## Compute
Xvars <- list(test[["Treatment"]])
Yvars <- list(test[["MeJA"]])

if (length(Xvars) != length(Yvars)) {
    stop("Unequal number of X and Y variables given")
}
# find range of X/Y values needed
Xrange <- range (c (Xvars), na.rm=TRUE)
Yrange <- range (c (Yvars), na.rm=TRUE)

type <- rep (c ('p'), length.out=length (Xvars));
col <- rep ('black', length.out=length (Xvars));
cex <- rep (1, length.out=length (Xvars));
pch <- rep (1, length.out=length (Xvars));
## Print result
rk.header ("Scatterplot", parameters = list (
    "X variables"=paste (rk.get.description (test[["Treatment"]]), collapse=", "),
    "Y variables"=paste (rk.get.description (test[["MeJA"]]), collapse=", ")))

rk.graph.on()

try ({
    # make frame and axes
    plot(Xrange, Yrange, type="n")

    # plot variables one X/Y pair at a time
    for (i in 1:length(Xvars)) {
        points (
            Xvars[[i]],
            Yvars[[i]],
            type = type[[i]],
            col = col[[i]],
            cex = cex[[i]],
            pch = pch[[i]]
        )
    }
})

rk.graph.off()
})
.rk.rerun.plugin.link(plugin="rkward::scatterplot", settings="cex.text=1\ncol.text='black'\ncolor.string=all\nisCex.string=all\nisPch.string=all\npch.text=1\nplotoptions.add_grid.state=0\nplotoptions.asp.real=0.00\nplotoptions.main.text=\nplotoptions.pointcolor.color.string=\nplotoptions.pointtype.string=\nplotoptions.sub.text=\nplotoptions.xaxt.state=\nplotoptions.xlab.text=\nplotoptions.xlog.state=\nplotoptions.xmaxvalue.text=\nplotoptions.xminvalue.text=\nplotoptions.yaxt.state=\nplotoptions.ylab.text=\nplotoptions.ylog.state=\nplotoptions.ymaxvalue.text=\nplotoptions.yminvalue.text=\npointtype.string=p\ntype_mode.string=all\nx.available=test[[\\\"Treatment\\\"]]\ny.available=test[[\\\"MeJA\\\"]]", label="Run again")
.rk.make.hr()
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: local ... eval -> eval -> eval -> eval -> rk.header -> sink -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: .rk.cat.output -> cat -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: rk.print.literal -> cat -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
An unspecified error occurred while running the command.
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: .rk.rerun.plugin.link -> .rk.cat.output -> cat -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: .rk.cat.output -> cat -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
Error in file(file, ifelse(append, "a", "w")) :
  cannot open the connection
Calls: rk.print.literal -> cat -> file
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file '/rk_out.html': Permission denied
An unspecified error occurred while running the command.