R语言——列表

Python019

R语言——列表,第1张

前一段工作太忙了，终于又有时间来继续学习了

列表就是一些对象（或成分，component）的有序集合。列表允许整合若干（可能无关）对象到单个对象名下。也就是说，某个列表中，可能是托干个向量、矩阵、数据框，甚至是其他列表的组合。函数list（）可创建列表。

下面创建一个列表

上述例子创建了一个列表，其中有四个成分：一个字符串、一个数值型向量、一个矩阵以及一个字符型向量。可以任意组合任意多的对象，并将它们保存为一个列表。

注意：可以通过双重括号知名代表某个成分的数字或者名称来访问列表中的元素。

列表允许以一种简单的方式组织和重新调用不相干的信息。其次，许多R函数的运行结果都是以列表的形式返回的。

一些小tips：

1、对象名称中的句点   .    没有特殊意义，但$ 和其他语言中句点有相似的意义，即指定一个数据框或列表中的某些部分。例如，A$x是指数据框A中的变量x。

2、R不提供多行注释或者是块注释功能。

3、将一个值赋予某个向量、矩阵、数组或者列表中一个不存在的元素时，R将自动扩展这个数据结构以容纳新值。

4、R中没有标量。标量以单元素向量的形式出现。

5、R中的下标不从0开始，而是从1开始。

6、变量无法被生命。他们在首次被赋值时生成。

qiime2会直接给出各个分类水平的丰度表，用R语言也可以从otu表中抽提出各个水平的丰度表。读取otu丰富度代码思路：1 strsplit后，phylum不是na也不是""则记下，否则记行数到delete2 添加phylum列，删除注释列和记到delete的phylum3 按Phylum排序，获取Phylum unique列表4提取第一个phylum所有行到新表，apply列求和5遍历剩下的phylum列表，提取每个phylum，apply按列求和，添加到新表6 数据归一化，保存拓展:R语言读取Excel文件的各种方法最近初学R语言，在R语言读入EXCEL数据格式文件的问题上遇到了困难，经过在网上搜索解决了这一问题，下面归纳几种方法，供大家分享：第一： R中读取excel文件中的数据的路径：假定在您的电脑有一个 excel 文件，原始的文件路径是： D:workdata1如果直接把这个路径拷贝到R中，就会出现错误，原因是：是escape character（转义符），\才是真正的字符，或者用/因此，在R中有两种方法读取该路径：1：在R中输入一下路径： D:\work\data\1 2：在R中输入一下路径： D:\work\data\1 第二： R中读取excel文件中的数据的方法 ：read.table(),read.csv(),read.delim()直接读取EXCEl文件时，都会遇到一下问题：“在读取‘.xls’的TableHeader时遇到不完全的最后一行”。解决的方法有以下几种：假如文件1.1中是一个6乘以2的矩阵，元素为：方法1： xls另存为csv格式然后用read.csv ：具体过程如下：>data<-read.csv("D:\work\data\1.csv") >data X1 X23 1 2 24 2 3 25 3 4 26 4 5 27 5 6 28 >data<-read.csv("D:\work\data\1.csv",header = F) >data V1 V2 1 1 23333 2 2 24 3 3 25 4 4 26 5 5 27 6 6 28 >data<-read.csv("D:\work\data\1.csv",header = T) >data X1 X23333 1 2 24 2 3 25 3 4 26 4 5 27 5 6 28 也就是说 header = T（TURE）是默认的状态 ，在这默认状态下，输出的data矩阵是一个5乘以2的矩阵，第一行作为了data的名字，如果 header = F（FALSE）， 则会现实原始的矩阵结果。方法2： xls另存为txt格式然后用read.table ： 如例子所示：>data<-read.table("D:\work\data\1.txt",header = T) >data X1 X23 1 2 24 2 3 25 3 4 26 4 5 27 5 6 28>data<-read.table("D:\work\data\1.txt",header = F) >data V1 V2 1 1 23 2 2 24 3 3 25 4 4 26 5 5 27 6 6 28 方法3：打开EXCEL，全选里面的内容，点击复制，然后在R中输入一下命令：数据分析培训data <- read.table("clipboard", header = T, sep = 't') 结果如下所示：>data <- read.table("clipboard", header = T, sep = 't') >data X1 X23 1 2 24 2 3 25 3 4 26 4 5 27 5 6 28 >data <- read.table("clipboard", header = F, sep = 't') >data V1 V2 1 1 23 2 2 24 3 3 25 4 4 26 5 5 27 6 6 28 使用这种方法的时候一定要注意复制！剪切板里面没有内容是无法运行的！