A few more comments on what to do

Author: rdpeng

cachematrix.R

@@ -1,10 +1,15 @@
-## [Put comments here that describe what your functions do]
+## Put comments here that give an overall description of what your
+## functions do
+
+## Write a short comment describing this function
 
 makeCacheMatrix <- function(x = matrix()) {
 
 }
 
 
+## Write a short comment describing this function
+
 cacheSolve <- function(x, ...) {
         ## Return a matrix that is the inverse of 'x'
 }