# get some random data of any shape at all
x <- matrix(runif(1000), 50, 20)
y <- runif(50)
b <- gpuSolve(x, y)
cat("Solution:
")
print(b)
cat("x * b
")
print(x %*% b)
cat("original y
")
print(y)Run the code above in your browser using DataLab