knit document added

Author: ppant

.Rhistory

@@ -0,0 +1,69 @@
+install.packages("swirl")
+load(swirl)
+library(swirl)
+swirl()
+swirl()
+swirl()
+swirl()
+install_from_swirl("R Programming")
+install_from_swirl("R Programming")
+install_from_swirl("https://github.com/swirldev/swirl_courses/tree/master/R_Programming")
+install_from_swirl("R Programming")
+install_from_swirl("R Programming")
+swirl()
+identical(2,2.0)
+library(datasets)
+data("iris")
+data(iris)
+data("mtcars")
+with(mtcars, tapply(mpg, cyl, mean))
+sapply(split(mtcars$mpg, mtcars$cyl), mean)
+tapply(mtcars$mpg, mtcars$cyl, mean)
+lapply(mtcars, mean)
+tapply(mtcars$mpg, mtcars$cyl,
+tapply(mtcars$cyl, mtcars$mpg, mean)
+)
+tapply(mtcars$cyl, mtcars$mpg, mean)
+tapply(mtcars$cyl, mtcars$mpg, mean)
+apply(mtcars, 2, mean)
+mean(mtcars$mpg, mtcars$cyl)
+sapply(mtcars, cyl, mean)
+split(mtcars, mtcars$cyl)
+apply(iris[, 1:4], 2, mean)
+apply(iris[, 1:4], 2, mean)
+result <- iris[iris$Species == "virginica", ]
+lapply(result[1], mean)
+matrix(c(1,2,3,4,5,6),nrow = 2, ncol = 3)
+?matrix
+mat<-matrix(c(1,2,3,4,5,6),nrow = 2, ncol = 3)
+mat
+solve(mat)
+solve(mat)
+mat<-matrix(c(1,2,3,4,5,6),nrow = 2, ncol = 3, byrow = TRUE)
+mat
+solve(mat)
+library("MASS", lib.loc="C:/Program Files/R/R-3.2.3/library")
+install.packages("MASS")
+ginv
+ls
+ginv
+getwd()
+setwd("F:/data from desktop/MyDocuments/Learning/GitHubProj/datasciencecoursera/ProgrammingAssignment2")
+getwd()
+source("makeCacheMatrix")
+source("makecacheMatrix")
+source("cachematrix.R")
+source("cachematrix.R")
+source("cachematrix.R")
+source("cachematrix.R")
+source("cachematrix.R")
+source("cachematrix.R")
+source("cachematrix.R")
+source("cachematrix.R")
+source("cachematrix.R")
+source("cachematrix.R")
+source("cachematrix.R")
+source("cachematrix.R")
+swirl()
+getwd()
+swirl