Answer for the problem

KazYasuda · KazYasuda · commit f6756bfc2d14 · 2014-06-22T17:22:54.000+01:00
diff --git a/cachematrix.R b/cachematrix.R
@@ -11,5 +11,5 @@ makeCacheMatrix <- function(x = matrix()) {
 ## Write a short comment describing this function
 
 cacheSolve <- function(x, ...) {
-        ## Return a matrix that is the inverse of 'x'
+        return (solve(x))
 }

Original file line number	Diff line number	Diff line change
`@@ -11,5 +11,5 @@ makeCacheMatrix <- function(x = matrix()) {`
`11`	`11`	`## Write a short comment describing this function`
`12`	`12`
`13`	`13`	`cacheSolve <- function(x, ...) {`
`14`		`- ## Return a matrix that is the inverse of 'x'`
	`14`	`+ return (solve(x))`
`15`	`15`	`}`