Added some comments

lrkirven · lrkirven · commit e224387df9ec · 2016-08-03T23:43:41.000-05:00
modified:   cachematrix.R
diff --git a/cachematrix.R b/cachematrix.R
@@ -1,8 +1,8 @@
-## Put comments here that give an overall description of what your
-## functions do
+## These functions cache previous calculated inverse of a matrix to avoid 
+## possible time-consuming computations.
 
 ## Creates a matrix and returns a list containing functions
-## to update the matrix' for inversr caching
+## to manage and update the matrix' for inversr caching
 
 makeCacheMatrix <- function(x = matrix()) {
     myInv <- NULL
@@ -17,10 +17,10 @@ makeCacheMatrix <- function(x = matrix()) {
 }
 
 
-## Checks if I have a cached value of the matrix.  If I do,
-## return the cached value. If not, calculate the inverse
-## of the incoming matrix via the solve function and cache 
-## the inverse value for the next call.
+## Checks if the matrix list has a cached value of the matrix. If it 
+## does, return the cached value. If not, calculate the inverse
+## of the matrix via the solve function and cache (or store) the 
+## inverse value for the next call.
 
 cacheSolve <- function(x) {
   invX <- x$getinv()
