Coding assn 2 Coursera.Rmd

---
title: "R Notebook"
output: html_notebook
---

This is an [R Markdown](http://rmarkdown.rstudio.com) Notebook. When you execute code within the notebook, the results appear beneath the code. 

Try executing this chunk by clicking the *Run* button within the chunk or by placing your cursor inside it and pressing *Ctrl+Shift+Enter*. 

```{r}
#Cache Function
jcachematrix <-function(x = matrix()){
  jj<- NULL
  jjset <- function(y){
    jjx <<- y
    jjinv <<- NULL
  }
  jjget <- function(){x}
  jjsetInverse <- function(jjinverse) {jjinv <<- inverse}
  jjgetInverse <- function(){jjinv}
  list(set = set, get = get, setInverse = setInverse, getInverse = getInverse)
}

#Cache Solve 
jjcachesolve <- function(jjx, ...){
  jjinv <- jjx$jjgetInverse()
    if (!is.null(jjinv)) {
      message("getting cache data")
      return(jjinv)
    }
    jjmat <- x$get()
    jjinv <- solve(mat, ...)
    x$setInverse(jjinv)
    jjinv
}
```

Add a new chunk by clicking the *Insert Chunk* button on the toolbar or by pressing *Ctrl+Alt+I*.

When you save the notebook, an HTML file containing the code and output will be saved alongside it (click the *Preview* button or press *Ctrl+Shift+K* to preview the HTML file).

The preview shows you a rendered HTML copy of the contents of the editor. Consequently, unlike *Knit*, *Preview* does not run any R code chunks. Instead, the output of the chunk when it was last run in the editor is displayed.