• API
• FAQ
• Tools
• Archive
SHARE
TWEET Untitled a guest Sep 16th, 2019 86 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
1. @@ -1,15 +1,41 @@
2. ## Put comments here that give an overall description of what your
3. ## functions do
4.
5. ## Write a short comment describing this function
6. ## Aim in this experiment is to write a pair of functions,
7. ## "makeCacheMatrix" and "cacheSolve" that cache the inverse of a matrix
8. ## makeCacheMatrix: This function creates a special "matrix" object that can cache its inverse.
9. ## cacheSolve: This function computes the inverse of the special "matrix" returned by makeCacheMatrix above.
10. ## makeCacheMatrix is a function which creates a special "matrix" object that can
11. ## cache its inverse for the input (which is an invertible square matrix)
12.
13. makeCacheMatrix <- function(x = matrix()) {
14.
15.         inv <- NULL
16.         set <- function(y) {
17.                 x <<- y
18.                 inv <<- NULL
19.         }
20.         get <- function() x
21.         setinv <- function(inverse) inv <<- inverse
22.         getinv <- function() inv
23.         list(set = set, get = get, setinv = setinv, getinv = getinv)
24. }
25.
26.
27. ## Write a short comment describing this function
28. ## cacheSolve is a function which computes the inverse of the special "matrix"
29. ## returned by makeCacheMatrix above. If the inverse has already been calculated
30. ## (and the matrix has not changed), then the cachesolve should retrieve the
31. ## inverse from the cache
32.
33. cacheSolve <- function(x, ...) {
34.         ## Return a matrix that is the inverse of 'x'
35.         inv <- x\$getinv()
36.         if(!is.null(inv)) {
37.                 message("getting cached result")
38.                 return(inv)
39.         }
40.         data <- x\$get()
41.         inv <- solve(data, ...)
42.         x\$setinv(inv)
43.         inv
44. }
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!

Top