当前位置:   article > 正文

R语言入门学习笔记-数据抽取02-记录抽取_r语言提取数据表中部分数据

r语言提取数据表中部分数据

R语言入门学习笔记-数据抽取01-字段拆分

目录

2 记录抽取

2.1指定值抽取

1)指定单个值抽取

 2)指定多个值抽取

2.2 关键词抽取

 2.3 数据范围抽取

 2.4时间范围抽取

 2.5 组合条件抽取


2 记录抽取

记录抽取,是指根据一定的条件对数据进行抽取,并缩减数据的范围与数量的方法,类似于Excel中的筛选功能。

在R语言中,可以通过向量化运算得到一组长度和数据框的行数相同的逻辑型序列,然后根据这个逻辑型序列的值,将TRUE对应位置的行保留并作为新的数据框返回,从而达到数据记录抽取的目的。

常用的抽取条件的烈性有指定值抽取、关键词抽取、数据范围抽取、时间范围抽取及组合条件抽取

导入数据

  1. data = read.csv('C:/Users/ABC/Desktop/书籍源代码和配套资源/谁说菜鸟不会数据分析(R语言篇)--数据/第四章/4.4.2 记录抽取/记录抽取.csv',
  2. fileEncoding="utf8",
  3. stringsAsFactors=FALSE)

2.1指定值抽取

指定值抽取是指根据字段制定的值进行数据记录的抽取,制定的值可以是字符串也可以是数值,可以是单个值也可以是多个值。

1)指定单个值抽取

在R语言中,指定单个值抽取可以使用1连等号“==”判断记录是否满足条件。例如,需要抽取商品品牌为台电的商品数据记录,代码如下。

fData = data[data$brand == "台电",]

 2)指定多个值抽取

在R语言中,指定多个值抽取可以使用%in%函数判断记录是否满足条件

例如,需要同时抽取商品品牌为“华为”,“小米”,“台电”的商品数据记录

fData = data[data$brand%in%c("华为","小米","台电"),]

2.2 关键词抽取

关键词抽取是指抽取制定字段中包含制定关键词的数据记录。在R语言中使用grepl函数进行关键词抽取。

grepl(pattern,x,ignore.case = FALSE,fixed = FALSE)

例如,需要抽取商品标题包含关键词“平板”的商品数据记录,代码如下:

  1. #抽取商品标题包含关键词“平板”的商品数据记录
  2. fData = data[grepl('平板',data$title),]

 2.3 数据范围抽取

例如抽取商品评论数大于10000的商品记录数据

  1. #抽取商品评论数大于10000的商品记录数据
  2. fData = data[data$comments > 10000,]

 2.4时间范围抽取

时间范围抽取,是指根据一定的时间范围条件对记录进行抽取。如果时间数据列为非时间型数据,则需要先将其转换为时间型数据再进行时间范围抽取,代码如下:

  1. #时间范围抽取
  2. #将ptime列转化为时间型数据
  3. data$ptime = strptime(
  4. data$ptime,
  5. format='%Y-%m-%d')
  6. )
  7. #先用strptime函数定义时间点,再按时间范围对数据进行筛选
  8. #定义时间点1,2015年01月01日
  9. dt1 = strptime('20150101',format='%Y%m%d')
  10. #定义时间点2,2015年12月31日
  11. dt2 = strptime('20151231',format='%Y%m%d')
  12. #获取介于两个时间点之间的数据
  13. fData = data[(data$ptime >= dt1)&(data$ptime <= dt2),]

 2.5 组合条件抽取

组合条件抽取是指使用逻辑运算,将指定值抽取、关键词抽取、数据范围抽取、时间范围抽取等多种抽取条件灵活足额来抽取数据记录。常用的组合条件逻辑运算有,并且(&)、或者(|)、取反(!)

例如,需要从商品数据记录中抽取评论数大于1000、小于或等于10000并且商品品牌为“小米”的商品数据记录。

  1. fData = data[
  2. (data$comments>=1000)
  3. &(data$comments<=10000)
  4. &(data$brand =='小米'),
  5. ]

 

声明:本文内容由网友自发贡献,不代表【wpsshop博客】立场,版权归原作者所有,本站不承担相应法律责任。如您发现有侵权的内容,请联系我们。转载请注明出处:https://www.wpsshop.cn/w/羊村懒王/article/detail/66033?site
推荐阅读
相关标签
  

闽ICP备14008679号