R语言基础(前13个基本函数)

 #c函数
a<-c(1,2,5,3,6,-2,4)
b<-c("one","two","three")
c<-c(TRUE,TRUE,FALSE,TRUE,FALSE)
 #返回一个向量中的元素
a<-c("k","j","a","c","m")
a[3]
a[c(1,3,5)]
a[2:6]
#matrix(用来创建矩阵：字符型，数值型，逻辑型)
y<-matrix(1:20,nrow=5,ncol=4)
y
#data.frame(创建数据框)
patientID <- c(1, 2, 3, 4)
age <- c(25, 34, 28, 52) 
diabetes <- c("Type1", "Type2", "Type1", "Type1") 
status <- c("Poor", "Improved", "Excellent", "Poor") 
patientdata <- data.frame(patientID, age, diabetes, status) 
patientdata
#list(一些对象或成分的有序集合)
mylist<-list(patientID,age)
mylist
mylist<-list(title=g,age)
mylist
mylist[[2]]
#sum(求和)、mean(求均值)
c<-c(1,23,45,78)
sum(c)
mean(c)#非数值类型，例如字符型和布尔型不适合mean函数
#substr(x,start,stop)#提取或替换一个字符串中的字串
x<-"abcdef"
substr(x,2,4)
substr(x,2,4)<-"22222"
x#将22222插入到原来的字符串中并返回修改后的新字符串
#sub(默认只匹配第一项)和gsub()
#sub()函数（在字符串中替换匹配的子串）
sub(pattern,replacement,x,ignore.case=FALSE,fixed=FALSE)
#pattern:正则表达式模式,用于匹配需要替换的字串
#repalcement:替换后的字符串
#x:要进行替换的字符向量或字符串
#ignore.case:可选参数,指定是否忽略大小写,默认为FALSE
#若fixed=TRUE,则pattern为一个文本字符串
#若fixed=FALSE,则pattern为一个正则表达式
s<-"Today is 2023/12/5."
result<-sub("\\d+","#",s)#("\d+"匹配了字符串s中的数字，然后将其替换为"#")
result
a<-"Hello There"
sub("\\s",".",a)#("\s"是用来查找空白的正则表达式，R语言中常用\\双反斜杠)
#gsub()函数（用于全局替换字符串中匹配的子串的函数）
s<-"Today is 2023/12/5."
result<-gsub("\\d+","#",s)
result
#if
if (is.character(grade)) grade <- as.factor(grade)
#if else
grade="poor"
if (!is.factor(grade)) grade <- as.factor(grade) else print("Grade already is a factor")
grade
#ifelse
score=0.3
ifelse(score>0.5,"Passed","Failed")
#toupper(x)(将符号中的小写字母转换为大写字母)
#返回类型：返回一个与输入字符串相同长度的字符向量，其中所有的小写字母被转换成了大写字母
a<-"abc"
toupper(a)
#set.seed()函数：设置随机数生成的种子，以控制随机数的生成
#runif()用来生成0到1区间上服从均匀分布的伪随机数
set.seed(1234)
runif(5)
#factor(将一个向量转换为因子，因子是用来表示分类数据的数据类型，可将数据分组并赋予每个组一个标签)
diabetes<-c("Type1","Type2","Type1","Type1")#普通因子
statues<-c("Poor","Improved","Excellent","Poor")#有序型因子
diabetes<-factor(diabetes)
diabetes
statues<-factor(statues,order=TRUE)
statues
#数值型变量可以用levels和labels参数来编码成因子
sex<-factor(c(1,2,1,2),levels=c(1,2),labels=c("Male","Female"))
sex
#as.factor(将各种对象类型（数字、字符、逻辑值等）转换为因子)
as.factor(sex)#如果输入的对象是数值或逻辑向量，那么它们会被转换为无意义的因子
#identical(用于比较两个对象是否等价，并返回一个逻辑值)
x<-5
y<-5
identical(x,y)
#ls()：列出当前工作环境中的对象(变量、函数等)，它返回一个当前环境中所有对象名称的字符变量
x<-5
y<-"hello"
z<-c(1,2,3)
ls()
ls(pattern="x")
#rm():删除指定的对象(变量、函数、数据集等)
x<-5
y<-"Hello"
rm(x,y)
y
或者
objects<-c("x","y")
rm(objects)
x