R语言实战学习笔记

setwd("C:/Users/wusuqi/Desktop/RData")
options()
options(digits = 3)
x<-runif(50)
summary(x)
hist(x)
q()
mymatrix<-matrix(1:25,nrow=5,ncol = 5,byrow = T,dimnames = list(c(1,2,3,4,5),c(7,8,9,10,6)))
mymatrix
mymatrix<-matrix(1:24,nrow=,ncol = 6,byrow = T,dimnames = list(c(1,2,3,4),c(7,8,9,10,6,11)))
mymatrix
#数组就是多维的矩阵
z<-array(1:24,c(2,3,4),dimnames = list(c(12,110),c(5,5,6),c(5,2,5,6)))
z
#矩阵的索引
z[1,2,3]
#数据框
patientid<-c(1,2,3,4)
admdata<-c("10/15/2009","11/01/2009","10/2/2009","10/28/2009")
age<-c(25,34,28,52)
diabetes<-c("type1","type2","type1","type1")
status<-c("poor","improved","excellent","poor")
patientdata<-data.frame(patientid,admdata,age,diabetes,status)
patientdata
table(patientdata$diabetes,patientdata$status)
attach(mtcars)
summary(mpg)
plot(mpg,wt)
detach(mtcars)
mtcars