2021年11月14日
R语言|计算元素字符字数|nchar()
摘要： nchar(qc$sfzh) table(nchar(qc$sfzh)) 阅读全文
posted @ 2021-11-14 22:13 西西与维奥拉 阅读(101) 评论(0) 推荐(0)
R语言|调整数据框内列的顺序|[,c()]
摘要： dt <- data.frame(v1=1:3, v2=4:6, v3=letters[1:3], v4=LETTERS[1:3]) dt dt1 <- dt[,c(1,4,3,2)] dat <- dat[,c(19,1,25,7,3,18,8,9)] 行同理 阅读全文
posted @ 2021-11-14 22:11 西西与维奥拉 阅读(1147) 评论(0) 推荐(0)
R语言|选取表内某一内容|$,==
摘要： dt.21 <- dt$name=='王鹏' 阅读全文
posted @ 2021-11-14 21:59 西西与维奥拉 阅读(464) 评论(0) 推荐(0)
R语言|数据框内列内频次|data.frame(table())
摘要： bb <- data.frame(table(jydat_glu$HIS_ITEMNAME)) 阅读全文
posted @ 2021-11-14 21:57 西西与维奥拉 阅读(67) 评论(0) 推荐(0)
R语言|合并两个数据框|rbind(),cbind(),left_join(),right_join(),merge()
摘要： rbind() jydat <- rbind(jydat1,jydat2) left_join() z_jydat <- left_join(z_jydat,qc,by="zyh") bqlb1 <- left_join(jydat2,gene1,by=c("name","gender")) mer 阅读全文
posted @ 2021-11-14 21:52 西西与维奥拉 阅读(717) 评论(0) 推荐(0)
R语言|去重|unique(),duplicated()
摘要： qc <- basy[,c(2,7)] qc <- unique(qc) index <- duplicated(qc$sfzh) qc <- qc[!index,] index <- duplicated(qc$zyh) qc <- qc[!index,] sch=sch[!duplicated( 阅读全文
posted @ 2021-11-14 21:36 西西与维奥拉 阅读(213) 评论(0) 推荐(0)
R语言|替换表内字符|gsub()
摘要： data$col <- gsub("1","",data$col)# 将data数据框col这一列中含有“1”的字符替换成空格 gsub()可以用于字段的删减、增补、替换和切割，可以处理一个字段也可以处理由字段组成的向量。 具体的使用方法为：gsub("目标字符", "替换字符", 对象). 在gs 阅读全文
posted @ 2021-11-14 21:33 西西与维奥拉 阅读(2917) 评论(0) 推荐(0)
R语言|提取列中某一类|grep()
摘要： glu <- grep("*(葡萄糖)",z_jydat$ITEMNAME) jydat_glu <- unique(z_jydat[glu,-1]) HIS <- grep("*(血常规)",z_jydat$HIS_ITEMNAME) jydat_xcg <- unique(z_jydat[HIS 阅读全文
posted @ 2021-11-14 21:26 西西与维奥拉 阅读(841) 评论(0) 推荐(0)
R语言|删除缺失值|na.omit(),which()函数，!is,na
摘要： dataframe <- data col <- val #删除data表里所有缺失值——na.omit() data <- na.omit(data) #选取data表中val列不含NA的行，重新赋给data——which(!is.na()) data <-data[which(!is.na(da 阅读全文
posted @ 2021-11-14 21:21 西西与维奥拉 阅读(5225) 评论(0) 推荐(0)
R语言|更改列名|rename()，colnames()
摘要： dataframe <- datacol <- col## 更改列名 data <- rename(data,col=newcol) 或 colnames(data)[1] <- "name" colnames(data) <- c("A1","A2","A3") 阅读全文
posted @ 2021-11-14 21:14 西西与维奥拉 阅读(16641) 评论(0) 推荐(0)
R语言|合并两列内容|unite()
摘要： ## 合并两列内容 install.packages("tidyr") library(tidyr) EUR <- tidyr::unite(EUR,"markername",X1,X11008,sep=":",remove=FALSE) EUR:数据框名字 （数据框，“合并后列名”，列1，列2，连 阅读全文
posted @ 2021-11-14 21:08 西西与维奥拉 阅读(607) 评论(0) 推荐(0)
R语言|转换大小写|toupper(),tolower()
摘要： ## 转换字符串大小写 x <- c("a","b","c","d") ## 转换小写 tolower(x) ## 转换大写 toupper(x) y <- toupper(x) # 转换数据框列大小写 A1 <- toupper(antisocial$Allele1) A2 <- toupper( 阅读全文
posted @ 2021-11-14 21:04 西西与维奥拉 阅读(222) 评论(0) 推荐(0)