Add missing ... to params

Author: psla

cachematrix.R

@@ -50,7 +50,7 @@ cacheSolve <- function(x, ...) {
   }
 
   # otherwise, compute the inverse and store in cache
-  computedInverse <- solve(x$get())
+  computedInverse <- solve(x$get(), ...)
 
   # store computed value in cache
   x$setinverse(computedInverse)
@@ -114,4 +114,4 @@ cachedMatrix <- function(x = matrix()) {
   # the public API now does not expose setinverse as it is handled internally
   list(set = set, get = get,
        getinverse = getinverse)
-}
+}