R语言 数据操作小贴士合集

#创建空的数据框

data <- data.frame(ID= character(), age= numeric(), stringsAsFactors=FALSE)

 

#排序

data2 <-  data[order(data[,18],decreasing=F),]   #将data数据集按照第18列的值升序排列命名为数据集data2

 

#删除空行

data <- data[complete.cases(data[,5:6]),]#删除第五六列有空值的行

data <- na.omit(data)#删除有空值的行

 

#左联1

data_merge <-  (merge(data_name, data_inform, by = 'id'))

#左联2

library(plyr)

data_join <- join(data_name, data_inform, by = "id")

#左联3

library(sqldf)

 data_sqldf1 <- sqldf(

         "SELECT data_name.name, data_inform.age

         FROM data_name INNER JOIN data_inform

         ON ladata_name.id= data_inform.id"

         )

 data_sqldf2 <- sqldf("SELECT * FROM data_name LEFT JOIN data_inform USING (id)")

 

#指定列缺失值填充

a[is.na(a[,16]),16] <- 0 #16列为空的行,将16列填充为0

 

#剔重

test[!duplicated(test),]

 

#重命名指定列

colnames(data)[2] <- 'newname'

 

转载于:https://www.cnblogs.com/shilo930/p/11149451.html

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值