R语言基本操作 基本运算符 数学运算运算后给出数值结果 , %,%/%,%米% 比较运算运算后给出判别结果( TRUE FALSE) <,<=,> 逻辑运算与、或、非 !,&,&n,,‖ 赋值符 或 注释 #(不支持多行注释)
R语言基本操作 基本运算符 数学运算 运算后给出数值结果 +, -, *, /, ^ , %%, %/%, %*% 比较运算 运算后给出判别结果(TRUE FALSE) >, <, <=, >=, ==, != 逻辑运算 与、或、非 !, &, &&, |, || 赋值符 = 或 <- 注释 #（不支持多行注释）
R语言基本操作 向量创建 character <-c("China","Korea,"Japan, UK,USA France","ndia",“ Russia")#字符型 #按Tab键自动补齐 > numerIc<c(1,2,3,6,7,8,4,5)#数值型 > factor<- factor(c(male"," female")#因子型 > logical<-c(T,TTE,EFT,T)#逻辑型 >rep(2,tmes=4)#重复数列 >rep(1:2,c(10,15) >seq(fom=3,to=21,by=3)#等差数列 >runf10,min=0,max=1)#随机数 > rnorm(10,mean=0,sd=1)#随机数(符合正态分布)
R语言基本操作 向量创建 > character <- c("China", "Korea", "Japan", "UK", "USA", “France”, “India”, “Russia”) #字符型 #按Tab键自动补齐 > numeric <- c(1, 2, 3, 6, 7, 8, 4, 5) #数值型 > factor <- factor(c(“male”, “female”)) #因子型 > logical <- c(T, T, T, F, F, F, T, T) #逻辑型 > rep(2,times=4) #重复数列 > rep(1:2,c(10,15)) > seq(from=3, to=21, by=3 ) #等差数列 > runif(10, min = 0, max= 1) #随机数 > rnorm(10, mean = 0, sd = 1) #随机数（符合正态分布）
R语言基本操作 矩阵创建 应用函数:dm0和 matrix( bind0#按列组合成矩阵 >X<-1:12 ( rbind(按行) >dim(x)<-c(3,4) >a<-c(1:5) ,1][2]L3][4] b<-c(2:6) [1,]14710 c<-c(3:7) [2,]25811 > bind(a, b, c) [3]36912 a b >X<-matrix(1 12, nrow=3, brow=T) [1]123 >t(x)#转置 [2]234 为行或列添加名称 B3]345 4]456 >row. names( #rownameso [5]567 >col names(#colnameso
R语言基本操作 矩阵创建 > x <- 1:12 > dim(x) <- c(3,4) [,1] [,2] [,3] [,4] [1,] 1 4 7 10 [2,] 2 5 8 11 [3,] 3 6 9 12 > x <- matrix(1:12,nrow=3,byrow=T) > t(x) #转置 > row.names() #rownames() > col.names() #colnames() > a <- c(1:5) > b <- c(2:6) > c <- c(3:7) > cbind(a, b, c) a b c [1,] 1 2 3 [2,] 2 3 4 [3,] 3 4 5 [4,] 4 5 6 [5,] 5 6 7 应用函数：dim()和matrix() 为行或列添加名称 cbind() # 按列组合成矩阵 （ rbind() 按行 ）
R语言基本操作 数据框创建 >a<c(1:5);b<-c(2:6);c<-c(3:7) #数据框取值 >d<-data frame a, b, c >d[1,2 [1]2 b 1123 []23456 2234 >dsb 3345 []23456 4456 5567 >d1<- data frame(d,c1=c(4:8)#增加一列数据 >d1 a b c c1 11234 22345 33456 44567 55678
R语言基本操作 数据框创建 > a <- c(1:5); b <- c(2:6); c <- c(3:7) > d <- data.frame(a, b, c) > d a b c 1 1 2 3 2 2 3 4 3 3 4 5 4 4 5 6 5 5 6 7 #数据框取值 > d[1, 2] [1] 2 > d[, 2] [1] 2 3 4 5 6 > d$b [1] 2 3 4 5 6 > d1 <- data.frame(d, c1 = c(4:8)) #增加一列数据 > d1 a b c c1 1 1 2 3 4 2 2 3 4 5 3 3 4 5 6 4 4 5 6 7 5 5 6 7 8
R语言基本操作 列表创建 创建列表 列表取值 lst < list(name= Donald, age=69, gender IstsgradeSmath factor("male"), grade data frame(math =90 [1]90 English =91)) >Ist[[4J]Smath [1]90 name 1 Donald 列表赋值 >lstsgender <-factor("male, levels =c(“ female",“male")#更改 Tlevels [1]69 IstSgrade <-data frame(lstSgrade 1] male biology=89)#给数据框增加一列 Levels: male math english 19091
R语言基本操作 列表创建 创建列表 > lst <- list(name = "Donald", age = 69, gender = factor("male"), grade = data.frame(math = 90, English = 91)) > lst $name [1] "Donald" $age [1] 69 $gender [1] male Levels: male $grade math English 1 90 91 列表取值 > lst$grade$math [1] 90 > lst[[4]]$math [1] 90 列表赋值 >lst$gender <- factor(“male”, levels = c(“female”, “male”)) #更改levels >lst$grade <- data.frame(lst$grade, biology = 89) #给数据框增加一列