forked from rdpeng/ExData_Plotting1
/
.Rhistory
79 lines (79 loc) · 2.69 KB
/
.Rhistory
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
source('~/dev/coursera/ProgrammingAssignment2/cachematrix.R')
mat <- makeCacheMatrix(matrix(1:4,2,2))
mat
mat$get
mat$get()
cacheSolve(mat)
cacheSolve(mat)
install.packages("RMySQL")
ucscdb <- dbConnect(MySQL(),user="genome",host="genome-mysql.cse.ucsc.edu")
import(MySQL)
library(MySQL)
library(RMySQL)
ucscdb <- dbConnect(MySQL(),user="genome",host="genome-mysql.cse.ucsc.edu")
result <- dbGetQuery(ucscdb,"show databases;"); dbDisconnect(ucscdb);
result
source('~/.active-rstudio-document')
install.packages("httpuv")
source('~/.active-rstudio-document')
source('~/.active-rstudio-document')
source('~/dev/coursera/oauth2-github.r')
library(dplyr
)
quit()
quit()
library(dataset)
library(datasets)
data(cars)
with(cars,plot(speed,dist))
summary(Cars)
summary(cars)
library(lattice)
state <- data.frame(state.x77, region = state.region)
xyplot(Life.Exp ~ Income | region, data = state, layout =c(4,1))
?par
?datasets
library(help = "datasets")
data(Titanic)
summary(Titanic)
Titanic
str(Titanic)
y <- rnorm(120)
plot(y)
x<- rnorm(100)
plot(x,y)
x <- plot(120)
plot(x,y)
x <- rnorm(120)
plot(x,y)
plot(x,y,pch=20)
title("scatterplot")
fit <- lm(x ~ y)
abline(fit)
fit <- lm(y ~ x)
abline(fit)
abline(fit)
example(points)
example(plots)
?Devices
dev.cur()
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot3.R')
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot3.R')
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot3.R')
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot3.R')
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot4.R')
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot4.R')
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot4.R')
rm(subset_data)
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot4.R')
?quartz
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot4.R')
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot4.R')
source('~/.active-rstudio-document')
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot4.R')
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot4.R')
source('~/.active-rstudio-document')
source('~/.active-rstudio-document')
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot4.R')
?par
source('~/dev/coursera/Course 4 - Exploratory Data Analysis/project 1/ExData_Plotting1/plot4.R')