摘要: Unite multiple columns into one by pasting strings together 通过将字符串粘贴在一起,将多个列统一为一个 Description Convenience function to paste together multiple columns 阅读全文
posted @ 2021-11-15 09:53 西西与维奥拉 阅读(5649) 评论(0) 推荐(0) 编辑
摘要: nchar(qc$sfzh) table(nchar(qc$sfzh)) 阅读全文
posted @ 2021-11-14 22:13 西西与维奥拉 阅读(87) 评论(0) 推荐(0) 编辑
摘要: 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 西西与维奥拉 阅读(1012) 评论(0) 推荐(0) 编辑
摘要: dt.21 <- dt$name=='王鹏' 阅读全文
posted @ 2021-11-14 21:59 西西与维奥拉 阅读(414) 评论(0) 推荐(0) 编辑
摘要: bb <- data.frame(table(jydat_glu$HIS_ITEMNAME)) 阅读全文
posted @ 2021-11-14 21:57 西西与维奥拉 阅读(56) 评论(0) 推荐(0) 编辑
摘要: 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 西西与维奥拉 阅读(503) 评论(0) 推荐(0) 编辑
摘要: 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 西西与维奥拉 阅读(160) 评论(0) 推荐(0) 编辑
摘要: data$col <- gsub("1","",data$col)# 将data数据框col这一列中含有“1”的字符替换成空格 gsub()可以用于字段的删减、增补、替换和切割,可以处理一个字段也可以处理由字段组成的向量。 具体的使用方法为:gsub("目标字符", "替换字符", 对象). 在gs 阅读全文
posted @ 2021-11-14 21:33 西西与维奥拉 阅读(2288) 评论(0) 推荐(0) 编辑
摘要: 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 西西与维奥拉 阅读(776) 评论(0) 推荐(0) 编辑
摘要: 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 西西与维奥拉 阅读(3756) 评论(0) 推荐(0) 编辑