关于数据选择

分别从两个数据框中选择出条件相等的数据,组成一个新的数据框;

1.函数名:merge

> t1<-data.frame(name=c("a","b","c"),age=c(1,2,3),sex=c("m","m","f"));t1

 name age sex
1    a   1   m
2    b   2   m
3    c   3   f

> t2<-data.frame(name=c("d","b","c"),age=c(4,5,6),sex=c("m","m","f"));t2
  name age sex
1    d   4   m
2    b   5   m
3    c   6   f
> m<-merge(t1,t2,by="name");m
  name age.x sex.x age.y sex.y
1    b     2     m     5     m
2    c     3     f     6     f

2.从某一个数据框中选择出某些条件的数据或是相关的列

函数名:subset()

#选出名字为"a"的相关信息

> test<-subset(t1,name=="a");test
  name age sex
1    a   1   m

>#选出名字为"a",的年龄和性别
 test<-subset(t1,name=="a",select=c(age,sex));test
  age sex
1   1   m

> test<-subset(t1,name=="a"&sex=="m",select=c(age,sex));test
  age sex
1   1   m

> test<-subset(t1,name=="a"&sex=="f",select=c(age,sex));test
[1] age sex
<0 行> (或0-长度的row.names)
>levels(mpg$manufacturer)
 [1] "audi"       "chevrolet"  "dodge"      "ford"      
 [5] "honda"      "hyundai"    "jeep"       "land rover"
 [9] "lincoln"    "mercury"    "nissan"     "pontiac"   
[13] "subaru"     "toyota"     "volkswagen"

                
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值