powered by
oclDevices
oclDevices(platform = oclPlatforms()[[1]], type = "default")
oclPlatforms
"cpu"
"gpu"
"accelerator"
"all"
"default"
p <- oclPlatforms() if (length(p)) print(oclDevices, "all")
Run the code above in your browser using DataLab