Fixing Comments

awad · awad · commit 46a99b4fe22e · 2014-07-23T20:26:38.000-07:00
diff --git a/cachematrix.R b/cachematrix.R
@@ -1,6 +1,3 @@
-## Put comments here that give an overall description of what your
-## functions do
-
 ## This function creates a special "matrix" object
 ## that can cache its inverse.
 makeCacheMatrix <- function(x = matrix()) {
@@ -20,9 +17,9 @@ makeCacheMatrix <- function(x = matrix()) {
 
 
 ## This function computes the inverse of the special
-##"matrix" returned by `makeCacheMatrix` above. If the inverse has
-##already been calculated (and the matrix has not changed), then
-##this function` retrieves the inverse from the cache.
+##"matrix" returned by the 'makeCacheMatrix' function. If the inverse has
+## already been calculated then this function retrieves the inverse from the cache.
+## else the functions computes the inverse and saves/set it in the cache
 cacheSolve <- function(x, ...) {
   ## Return a matrix that is the inverse of 'x'
   inv <- x$getinverse()
