Nothing
JuliaPlain <- function(x){
if (!is.object(x)) {
class(x) <- "JuliaPlain"
}
x
}
#' @export
rep.JuliaPlain <- function(x, ...){
JuliaPlain(NextMethod("rep"))
}
#' @export
as.logical.JuliaPlain <- function(x, ...){
JuliaPlain(NextMethod("as.logical"))
}
#' @export
`[[<-.JuliaPlain` <- function(x, i, value)
julia_call("JuliaCall.assign!", x, value, as.integer(i))
#' @export
`[<-.JuliaPlain` <- function(x, ..., value){
julia_do.call("JuliaCall.assign!", c(list(x, value), as_indexes(list(...))))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.