列表是一种特别的对象集合,它的元素也由序号(下标)区分,但是各元素的类型可 以是任意对象,不同元素不必是同一类型。元素本身允许是其它复杂数据类型,比如,列表 的一个元素也允许是列表。例如:

> rec <- list(name="李明", age=30, scores=c(85, 76, 90))
> rec
$name
[1] "李明"
 
$age
[1] 30
 
$scores
[1] 85 76 90
列表元素总可以用“列表名[[下标]]”的格式引用。例如:
> rec[[2]]
[1] 30
> rec[[3]][2]
[1] 76

修改列表

列表的元素可以修改,只要把元素引用赋值即可。如:
> rec$age <- 45
甚至
> rec$age <- list(19, 29, 31)
(可以任意修改一个列表元素)。如果被赋值的元素原来不存在,则列表延伸以包含该新 元素。

提取某List某指标

方法一:

先编写一个提取list子集的函数:

  1. subdate<- function(x){
  2. x$DATE
  3. }

复制代码

然后用lapply或者sapply

sapply(s,subdate)

看一下出来的结果



方法二:

提取DATE内容:

  1. s[[1]]$DATE

复制代码

变动其中的数字,就可以把每一组的DATE提取出来了。

(需要自己编写循环)

参考于:http://bbs.pinggu.org/thread-3410181-1-1.html

方法三:提取长度大于某程度的list

x[lapply(x, length)>100]

用lapply计算每个x的长度。

list之间的合并

list之间的合并用:

c(list(1),list(2))

——————————————————————————————————————————————————————————————————————

unlist与list的区别

unlist(x)生成一个包含x所有元素的向量。作用是,展平数据列表。
unlist把l.ex[1]=unlist(l.ex)[1]+unlist(l.ex)[2],一拆为二。
> ##unlist是啥??
> l.ex <- list(list(1:5, LETTERS[1:5]), list("Z","A"),  NA)
> #list数据[]与[[]]是一样的
> l.ex[2]
[[1]]
[[1]][[1]]
[1] "Z"

[[1]][[2]]
[1] "A"

> l.ex[[2]]
[[1]]
[1] "Z"

[[2]]
[1] "A"

>
> #unlist把l.ex[1]的元素拆开了,分为unlist[1]+unlist[2]
> unlist(l.ex, recursive = FALSE)[3]
[[1]]
[1] "Z"

> unlist(l.ex, recursive = FALSE)[[3]]
[1] "Z"

————————————————————————————————————————————————————————————————

list在批量读取、写出xlsx数据时的用法

方法弊端:弊端就是循环语句的弊端,导入的原始数据每个sheet都需要相同的数据结构。

list在批量读取数据时候的用法,一开始笔者困惑在:

1、如何循环读取xlsx中的sheet数据,然后批量放入list之中?——先定义list

2、如何定义写出时候的文件名字——paste函数

批量读取的基本流程就是:写入(list[[i]])、操作、写出

#1、读取xlsx中所有的sheet表格
#如果像vector一样定义List??——list()函数来主动定义,用data.list[[i]]来赋值
data.list<-list()
for (i in 1:2){
  data.list[[i]]=read.xlsx("C1.xlsx",i)
}

以上是写入,看看如何写出:

#3、利用List批量读出操作
#难点:如果构造输出表格的名称——paste来构造名称
flie=list()
xlsxflie=paste(1:2,".xlsx",sep="")

for(i in 1:2){
flie[[i]]=paste("C:/Users/long/Desktop/",xlsxflie[i],sep="")
write.xlsx(data.list2[[i]],file)
}

写出时候文件名称困扰我很久,如何按照一定的规则来命名,可以先用paste弄好固定格式,然后通过paste[i]循环调用。

其中:paste之后会有如vector一般的格式,可以用[i]来调用。

————————————————————————————————————————————————————————————————

list中的字符串型数据如何导出?

list是大规模数据操作非常优秀的方式,能够存放非结构化的文本数据。但是如果,文本分好词之后的数据(如下图),如何将存放在list中的数据进行导出呢?

[[1]]
        n         v        en         n
   "职位"    "描述" "Android"    "平台"    

[[2]]
           n            v            n
      "岗位"       "描述"       "前端"

笔者想办法的几种方式:

unlist->变成向量

data.frame->变成序号+单词

as.chacter->单个文本

#list中的字符串型数据如何导出?

#list中非一般的字符串形式
[[1]]
n         v        en         n
"职位"    "描述" "Android"    "平台"    

[[2]]
n            v            n
"岗位"       "描述"       "前端"     

#1、unlist与list区别
Job_Pwordseg.ct[1][1]        #不论如何都不能得到list中的单个单词
unlist(Job_Pwordseg.ct[1])[1]#可以得到单个单词,向量形式

#2、data.frame法,批量处理时,因为不等长而无法合并
data.frame(Job_Pwordseg.ct[1])          #变成了序号+单词
data.frame(unlist(Job_Pwordseg.ct[1]))  #跟list一样的结果

#3、as.character
as.character(unlist(Job_Pwordseg.ct[1]))
#[1] "职位"    "描述"    "Android" "平台"    "进行"    "手机"
as.character(Job_Pwordseg.ct[1])
#[1]"c(\"职位\", \"描述\", \"Android\", \"平台\", \"进行\")

变换得到了数据之后,又出现了问题:

如何将list中那么子集合并?——不等长合并

两种方法:c(),可以将list[1] 和list[2]进行直接合并,可以兼容不等长,当然合并之后,还有list文件;

rbind.fill函数,不等长合并函数,在plyr包中。

#4、t()在list的文本型
t(data.frame(Job_Pwordseg.ct[1]))
#A [,1]   [,2]   [,3]
#"职位" "描述" "Android"
data.frame(t(data.frame(Job_Pwordseg.ct[1])))
#A [,1]   [,2]   [,3]
#职位    描述   Android

#4、list中字符的合并用c
c(Job_Pwordseg.ct[1],Job_Pwordseg.ct[2])

不等长合并的时候,rbind.fill函数可以很好将数据进行合并,并且补齐没有匹配到的缺失值为NA。

#如何解决合并时数据不等长问题——两种方法:do.call函数以及rbind.fill函数(plyr包)
#rbind.fill函数只能合并数据框格式
#do.call函数在数据框中执行函数(函数,数据列)
library("plyr")  #加载获取rbind.fill函数
#第一种方法
list1<-list()
list1[[1]]=data.frame(t(data.frame(Job_Pwordseg.ct[1])))
list1[[2]]=data.frame(t(data.frame(Job_Pwordseg.ct[2])))
do.call(rbind.fill,list1)
#第二种方法
u=rbind.fill(data.frame(t(data.frame(Job_Pwordseg.ct[1]))),data.frame(t(data.frame(Job_Pwordseg.ct[2]))))

得到了数据之后,数据量小的话,很容易读写,但是数据量大的话,很难做到那么顺畅。当然,为什么要导出呢——因为要传给别的队友。。。

可以有两种办法:

1、批量写出,批量读入;

2、写写成一个data,然后导出,再写入。

#读写函数用write.table、read.table+t()
write.table(u,"C:/Users/long/Desktop/3.txt")
t(read.table("C:/Users/long/Desktop/3.txt"))
#分隔符sep=""(空格、制表符、回车),"\n"(引号),"\t"(制表符分隔符中有空格)
#字符型字段中,自带空格,则使用参数 strip.white=TRUE

#方法一:单文件导出,后批量导入

#方法二:先合成一个文本导出,再导入

R语言︱list用法、批量读取、写出数据时的用法的更多相关文章

  1. R语言学习笔记:读取前n行数据

    常规读取 一般我们读取文件时都会读取全部的文件然后再进行操作,因为R是基于内存进行计算的. data <- read.table("C:\\Users\\Hider\\Desktop\ ...

  2. 寻找与疾病相关的SNP位点——R语言从SNPedia批量提取搜索数据

    是单核苷酸多态性,人的基因是相似的,有些位点上存在差异,这种某个位点的核苷酸差异就做单核苷酸多态性,它影响着生物的性状,影响着对某些疾病的易感性.SNPedia是一个SNP调査百科,它引用各种已经发布 ...

  3. r语言之生成随机序列,随机数生成函数及用法

    (1)生成正态分布随机数: rnorm(n,mean,sd)     其中,n表示生成的随机数个数,mean表示正态分布均值,sd表示正态分布标准差 > rnorm(5,0,2)[1] -5.3 ...

  4. R语言︱文件读入、读出一些方法罗列(批量xlsx文件、数据库、文本txt、文件夹)

    笔者寄语:小规模的读取数据的方法较为简单并且多样,但是,批量读取目前看到有以下几种方法:xlsx包.RODBC包.批量转化成csv后读入. R语言中还有一些其他较为普遍的读入,比如代码包,R文件,工作 ...

  5. R语言从小木虫网页批量提取考研调剂信息

    一.从URL读取并返回html树     1.1 Rcurl包         使用Rcurl包可以方便的向服务器发出请求,捕获URI,get 和 post 表单.比R socktet连接要提供更高水 ...

  6. R语言︱函数使用技巧(循环、if族/for、switch、repeat、ifelse、stopifnot)

    每每以为攀得众山小,可.每每又切实来到起点,大牛们,缓缓脚步来俺笔记葩分享一下吧,please~ --------------------------- 后续加更内容: 应用一:if族有哪些成员呢?- ...

  7. R语言︱构造新序列

    1.数值构造函数rep与seq #数值构造rep与seq rep(1:4,each=2)#依次重复1:4两遍 rep(1:4,2) #注意,重复1:4两遍 seq(from=3,to=5,by=0.2 ...

  8. R语言中知识点总结(二)

    一些函数不知道什么意思要查,看数值例子,做笔记,知道函数的功能,函数和返回值. 网页上查找关键词,巧用查找(ctrl+F) 数据读取处理,有read.table   read R-读取数据(导入csv ...

  9. R语言-处理异常值或报错的三个示例

    博客总目录:http://www.cnblogs.com/weibaar/p/4507801.html Tuesday, March 31, 2015 之前用rvest帮人写了一个定期抓取amazon ...

随机推荐

  1. TensorflowTutorial_二维数据构造简单CNN

    使用二维数据构造简单卷积神经网络 觉得有用的话,欢迎一起讨论相互学习~Follow Me 图像和一些时序数据集都可以用二维数据的形式表现,我们此次使用随机分布的二位数据构造一个简单的CNN-网络卷积- ...

  2. Python CRM项目三

    1.分页: 分页使用Django内置的分页模块来实现 官方的分页案例 from django.core.paginator import Paginator, EmptyPage, PageNotAn ...

  3. template()方法

    template(id, data)方法: id:必传,渲染模板的id. data:可选,一个Object对象. return:传data—>渲染完成html代码:不传data—>一个渲染 ...

  4. 同一台机器上多个tomcat启动造成的内存溢出问题的解决方法。

    加下面这句话就行了,我是WIN10+双tomcat+nginx(本地站点),无压力.在编译器的vm option里面加哦. -server -Xms512m -Xmx1024m -XX:PermSiz ...

  5. 已知有两个水杯,一个11L一个7L,水可以任意使用,求怎么得到2L 的详细解法

    问题:有两个水杯,一个是11L一个是7L,水可以随便用,怎么得到2L 1.了解问题的本质 问题中给出了两个杯子,只有这两个杯子有量度,所以只能让杯中的水满进满出才能确定杯子中最后有多少水. 现在问题要 ...

  6. libGDX-wiki发布

    为方便大家学习和访问,我将libgdx的wiki爬取到doku-wiki下,专门建立了以下地址.欢迎大家来共同完善. http://wiki.v5ent.com

  7. 介绍一种非常好用汇总数据的方式GROUPING SETS

    介绍 对于任何人而言,用T-SQL语句来写聚会查询都是工作中重要的一环.我们大家也都很熟悉GROUP BY子句来实现聚合表达式,但是如果打算在一个结果集中包含多种不同的汇总结果,可能会比较麻烦.我将举 ...

  8. 洛谷 [P3355] 骑士共存问题

    二分图求最大独立点集 本问题在二分图中已处理过,此处用dinic写了一遍 #include <iostream> #include <cstdio> #include < ...

  9. BZOJ 3782: 上学路线 [Lucas定理 DP]

    3782: 上学路线 Time Limit: 10 Sec  Memory Limit: 128 MBSubmit: 192  Solved: 75[Submit][Status][Discuss] ...

  10. 自动化测试selenium(三) 由于iframe 定位不到元素

    iframe原因定位不到元素 现在的项目后台基本都是上左右结构,要出现这个结构效果,需要使用到了iframe标签: 我们先说说iframe在java中使用的方法: driver.switchTo(). ...