library(jack)
if(JuliaConnectoR::juliaSetupOk()){
julia <- Jack_julia()
# numerical evaluation ####
julia$Jack(x = c(2, 2/3), lambda = c(3, 1), alpha = 3/2)
# to pass rational numbers, use strings:
julia$Jack(x = c("2", "2/3"), lambda = c(3, 1), alpha = "3/2")
# symbolic polynomials ####
# for `JackPol`, you must pass a rational `alpha` as a string if
# you want an exact polynomial:
( pol <- julia$JackPol(m = 2, lambda = c(3, 1), alpha = "3/2") )
class(pol)
JuliaConnectoR::stopJulia()
}
Run the code above in your browser using DataLab