R语言的小个性

这篇文章用来记录我在学习使用R语言中遇到的一些区别于其他程序语言的小问题,以及一些解决方案。会持续记录下去。

1.       除法

R语言的除法运算符与其他常见语言一致:/

> 8/5

[1] 1.6

但是取余运算符为:%%

> 8%%5

[1] 3

除法运算取整除数:%/%

> 8%/%5

[1] 1

除法四舍五入:round()

round()后面再带一个参数表明保留到第几位(为正数时是指保留几位小数,为负数时是指四舍五入到第几位)

> round(8/5)

[1] 2

> round(3.141592653,2)

[1] 3.14

> round(3.141592653*100000,-2)

[1] 314200

2.       list和data.frame的区别

list和data.frame是R中处理表格数据常见的两种格式,另外还有matrix。

先说matrix,它必须保证所有的数据都是同一类型的。

> b <-matrix(c(1,1,1, 2,2,3, 1,3,4, 2,1,4), ncol=3, byrow=T)

> b

[,1][,2] [,3]

[1,]   1    1    1

[2,]   2    2    3

[3,]   1    3    4

[4,]   2    1    4

> a <- matrix(c(1,1,"wo",2,2,3, 1,3,4, 2,1,4), ncol=3, byrow=T)

> a

[,1][,2] [,3]

[1,] "1"  "1" "wo"

[2,] "2"  "2" "3"

[3,] "1"  "3" "4"

[4,] "2"  "1" "4"

> mode(a)

[1] "character"

> mode(b)

[1] "numeric"

可以看到a跟b的差异就是a中有个字符类型的数据“wo”,但是打印出来后,其他数值类型数据也被转换为了字符类型。

现在来看list和data.frame的差异,它们都可以包含不同类型的数据但是也有些差异。

差异1:部分数据查看及展示方式不同。list按列展示数据,data.frame按行展示。

> list <-list(a=c("hai","tian","xiang","jie","de"),b=c("di","fang","jiu","shi","wo"),c=c("qian"

,"gua","de","gu","xiang"))

> list

$a

[1] "hai"   "tian"  "xiang" "jie"   "de"

$b

[1] "di"   "fang" "jiu"  "shi"  "wo"

$c

[1] "qian"  "gua"   "de"    "gu"    "xiang"

> dataframe

a    b     c

1  hai   di  qian

2  tianfang   gua

3 xiang jiu    de

4  jie  shi    gu

5    de   wo xiang

> head(list,n=1)

$a

[1] "hai"   "tian"  "xiang" "jie"   "de"

> head(dataframe,n=1)

a  b    c

1 hai di qian

差异2:查看列名,对于list来说应该是查看行名(我的说法)是用names(),对于dataframe来说则是查看列名用colnames(),它还有查看行名rownames(),没有定义时,默认为1,2,3,4……序列。

> names(list)

[1] "a" "b" "c"

> colnames(dataframe)

[1] "a" "b" "c"

> rownames(dataframe)

[1] "1" "2" "3""4" "5"

差异3:list可包含不同长度数据,dataframe必须每列包含相同长度数据,在list每行数据长度相同时,就可以使用as.data.frame()方法转换为data.frame类型。

> list2 <-list(a=1:5,b=1:4)

> list2

$a

[1] 1 2 3 4 5

$b

[1] 1 2 3 4

> dataframe2<- as.data.frame(list2)

Error in data.frame(a = 1:5, b =1:4, check.names = TRUE, stringsAsFactors = TRUE) :

参数值意味着不同的行数: 5, 4

> list2 <-list(a=1:5,b=6:10)

> list2

$a

[1] 1 2 3 4 5

$b

[1] 6  7  8  9 10

> dataframe2<- as.data.frame(list2)

> dataframe2

a  b

1 1  6

2 2  7

3 3  8

4 4  9

5 5 10

差异4:数据引用方式不同。都可以用$引用符号,但是[]引用和[[]]引用方式上有差异。

> list$a

[1] "hai"   "tian"  "xiang" "jie"   "de"

> dataframe$a

[1] hai  tian  xiang jie   de

Levels: de hai jie tian xiang

> list[1]

$a

[1] "hai"   "tian"  "xiang" "jie"   "de"

> dataframe[1]

a

1   hai

2  tian

3 xiang

4   jie

5    de

> list[[1]]

[1] "hai"   "tian"  "xiang" "jie"   "de"

> dataframe[[1]]

[1] hai  tian  xiang jie   de

Levels: de hai jie tian xiang

> list[[2]][1]

[1] "di"

> dataframe[[2]][1]

[1] di

Levels: di fang jiu shi wo

> list[2,1]

Error in list[2, 1] : incorrectnumber of dimensions

> dataframe[2,1]

[1] tian

Levels: de hai jie tian xiang

差异5:data.frame有一个factor因子,在差异四中,查看dataframe的某一列或者某一项数据时,数据下面会有Levels的内容,这个就是这一列的因子。相当于这一列的取值范围,有哪些唯一值。后面会讲到factor因子的来历以及作用,这里就不细说了。

3.       删除某一行或者某一列的数据。

对list和dataframe都适用。删除行可以直接引用这一行并赋值为NULL,或者用-操作符号,具体实现过程如下示。

> list$a <-NULL

> list

$b

[1] "di"   "fang" "jiu"  "shi"  "wo"

$c

[1] "qian"  "gua"   "de"    "gu"    "xiang"

> list[-1]

$b

[1] "di"   "fang" "jiu"  "shi"  "wo"

$c

[1] "qian"  "gua"   "de"    "gu"    "xiang"

> list$a

[1] "hai"   "tian"  "xiang" "jie"   "de"

> list$a[-1]

[1] "tian"  "xiang" "jie"   "de"

> list[-1,]

Error in list[-1, ] : incorrectnumber of dimensions

> list[,-1]

Error in list[, -1] : incorrectnumber of dimensions

> dataframe$a<- NULL

> dataframe

b     c

1  di  qian

2 fang  gua

3 jiu    de

4  shi    gu

5   woxiang

> dataframe<- as.data.frame(list)

> dataframe[-1,]

a    b     c

2  tianfang   gua

3 xiang jiu    de

4  jie  shi    gu

5   de   wo xiang

> dataframe <- as.data.frame(list)

> dataframe[,-1]

b     c

1  di  qian

2 fang  gua

3 jiu    de

4 shi    gu

5   woxiang

> dataframe$b

[1] di  fang jiu  shi  wo

Levels: di fang jiu shi wo

> dataframe$b[-2]

[1] di jiu shi wo

Levels: di fang jiu shi wo

Matrix也可用类似的操作来删除某行某列的数据,还可以一次删除多个行多列或者多个值。

> dataframe$c

[1] qian gua   de    gu   xiang

Levels: de gu gua qian xiang

> dataframe$c[c(-1,-3,-5)]

[1] gua gu

Levels: de gu gua qian xiang

4.      读取数据。

主要是为了讲read.table()和read.csv()方法的一些小细节。数据读入后都被存为data.frame的类型。

编码:read.csv()默认读取中文的格式是gbk格式的,无法设置。如果你的读入文件中文编码格式是UTF-8格式,使用read.csv就会出现乱码。但是read.table()方法默认读取UTF-8格式中文,并且包含encoding参数,可以设置读取数据的编码格式。

表头:read.csv()默认是含有表头的也就是header=T,read.table()默认没有表头header=F。

因子:read.csv()和read.table()两个方法都有stringsAsFactors参数,默认为TRUE。如果你不设置的话,数据读入时,每一列字符型的数据都按因子方式存储。如下面例子,fruit列被转换成了因子,数据被转换成了1,1,3,4,2,这几个数值1-4按顺序分别对应着Levels:苹果葡萄 香蕉 柚子。但是我们查看这一列数据时,显示的还是字符型数据。

> test

fruitprice

1  苹果 5.98

2  苹果 3.50

3  香蕉 4.50

4  柚子 4.80

5  葡萄 8.70

> test$fruit

[1] 苹果苹果香蕉柚子葡萄

Levels: 苹果葡萄香蕉柚子

从clipboard上读入数据:见上一个列子中,我们能直接从clipboard上读取数据,先在Excel上选中需要读入的数据区域,右键复制,再执行read.table("clipboard")语句即可。

> test <-read.table("clipboard",header=T)

> test

fruitprice

1  苹果 5.98

2  苹果 3.50

3  香蕉 4.50

4  柚子 4.80

5  葡萄 8.70

5.       两表合并的方法

这里是两个表类似MySQL中join的方法——merge(),默认根据两个表相同列名相交。方法的介绍见链接:http://my.oschina.net/u/1791586/blog/337054,里面有很详细的方法说明。想说明的是参数all/x.all/y.all,这三个参数取值T/F,用来定义是否取两个数据框x或者y的所有列。效果分别类似join的全连接,左连接,右连接。就不另外举例子了,参考链接里有很好的例子。

6.       查看数据。

View()可以查看list、vector、dataframe数据,但是在Rstudio中,用View()查看时会有中文乱码。不过mac和Linux平台上不存在这个问题,只用Windows平台上才有,好像没看到有什么设置Rstudio的方式可以避免这个的中文乱码。R中不存在乱码的问题。

fix()也可以查看list、vector、dataframe数据。

区别在于fix()方法可以查看列所包含的字段数不同的list的内容。View()只能查看整齐的数据,就是行列数都相同时的数据。另外fix()方法是查看数据,打开数据编辑框,并能够在其中修改数据。View()方法只是单纯的查看数据。

> test <-list(a=c("a","b","c","d"),b=1:4)

> View(test)

> fix(test)

> fix(dataframe)

7.       R语言的数据类型查看mode()/class()/typeof()

没有找到一个很细致的说明,只能根据我自己的大概理解来看,可能会有误,欢迎指正。这三个函数都是能够查看数据类型的函数。但是有些小细节的差异。

R语言中,所有的数据、对象、方法、语句都可以查看mode(),主要的mode类型有:complex、raw、character、list、expression、name、symbol、function,mode可以说是大的类型。

所有对象都有typeof属性和class属性,但是相比class而言,typeof更细致。

>x <- c(1,2,3,4,5)

>mode(x)

[1]"numeric"

> class(x)

[1]"numeric"

> typeof(x)

[1] "double"

转载请注明来源,谢谢!

时间: 2024-11-06 17:24:12

R语言的小个性的相关文章

R语言自学小计,从零到画函数图像

自从入了菊花厂,空余时间就得越来越少了.加之毕业前的几个月放纵,留下了很多未出毕业的游戏,荒废了一些时间,人也颓废了许多.工作压力变得越来越大,对工作环境越来越不满,让我变得想逃离这里.既然想逃离菊花厂,自然要准备点技能,收拾收拾心情准备开始做离职了. 首先向探一探数据挖掘的深浅,了解下R语言.从入门的这些知识学习看来,R和matlab确实很相似. 基础知识准备: https://www.w3cschool.cn/r/ 花了一点时间,找到了W3C上的一点资料,看完基本语法就可以动手开始玩一玩了

R语言-Kindle特价书爬榜示例 &amp; 输出HTML小技巧

自从买了kindle以后,总是想要定期刷有没有便宜的书,amazon经常有些1元/2元的书打特价,但是每次都去刷那些榜单太麻烦了,而且榜单又不能按照价格排名,捞书有点累 所以自己用R语言的rvest包简单写了一个小程序,让它自动按照不同价格区间把特价书给分出来. 主要看的是kindle新品排行榜和最快畅销榜. 销售爬升最快榜: http://www.amazon.cn/gp/movers-and-shakers/digital-text/ 新品榜: http://www.amazon.cn/gp

R语言(入门小练习篇)

问题: 一组学生参加了数学.科学和英语考试.为了给所有的学生确定一个单一的成绩衡量指标,需要将这些科目的成绩组合起来.另外,还想将前20%的学生评定为A,接下来20%的学生评定为B,以此类推.最后,希望按字母顺序对学生排序. Excel中的数据表(自己一个个敲的,最讨厌做的事情TT) StuId StuName Math Science English 1 John Davis 502 95 25 2 Angela Williams 465 67 12 3 Bull Jones 621 78 2

R语言学习中的小bug:R中矩阵相乘错误于A %*% B: 需要数值/复数矩阵/矢量参数

遇到了小bug: R中矩阵相乘错误于A %*% B: 需要数值/复数矩阵/矢量参数 看到网上别人的做法,发现了用class(A)和class(B)之后才发现,是因为读入的时候数据的类型不对,A.B的类型并不是matrix,才导致了这个问题. 用as.matrix来变型一下,就OK了. R语言学习中的小bug:R中矩阵相乘错误于A %*% B: 需要数值/复数矩阵/矢量参数,布布扣,bubuko.com

R语言-Kindle特价书爬榜示例 &amp; 输出HTML小技巧(转)

自从买了kindle以后,总是想要定期刷有没有便宜的书,amazon经常有些1元/2元的书打特价,但是每次都去刷那些榜单太麻烦了,而且榜单又不能按照价格排名,捞书有点累 所以自己用R语言的rvest包简单写了一个小程序,让它自动按照不同价格区间把特价书给分出来. 主要看的是kindle新品排行榜和最快畅销榜. 销售爬升最快榜: http://www.amazon.cn/gp/movers-and-shakers/digital-text/ 新品榜: http://www.amazon.cn/gp

用蒙特卡洛方法计算派-python和R语言

用蒙特卡洛方法算pi-基于python和R语言 最近follow了MOOC上一门python课,开始学Python.同时,买来了概率论与数理统计,准备自学一下统计.(因为被鄙视过不是统计专业却想搞数据分析) 有趣的是书里面有一块讲蒲丰投针计算Pi,这是一种随机模拟法,也就是蒙特卡洛法.蒲丰投针之于我太难,暂时没想到怎么用计算机模拟这一过程. python课中,老师也提到用随机模拟法,也就是蒙特卡洛法(MonteCarlo),用计算机模拟几千次实验,计算pi的近似值.好巧. 就拿python课中的

[译]用R语言做挖掘数据《七》

时间序列与数据挖掘 一.实验说明 1. 环境登录 无需密码自动登录,系统用户名shiyanlou,密码shiyanlou 2. 环境介绍 本实验环境采用带桌面的Ubuntu Linux环境,实验中会用到: 1. LX终端(LXTerminal): Linux命令行终端,打开后会进入Bash环境,可以使用Linux命令2. GVim:非常好用的编辑器,最简单的用法可以参考课程Vim编辑器3. R:在命令行输入‘R’进入交互式环境,下面的代码都是在交互式环境运行4. 数据:在命令行终端输入以下命令:

R语言基因组数据分析可能会用到的data.table函数整理

R语言data.table包是自带包data.frame的升级版,用于数据框格式数据的处理,最大的特点快.包括两个方面,一方面是写的快,代码简洁,只要一行命令就可以完成诸多任务,另一方面是处理快,内部处理的步骤进行了程序上的优化,使用多线程,甚至很多函数是使用C写的,大大加快数据运行速度.因此,在对大数据处理上,使用data.table无疑具有极高的效率.这里主要介绍在基因组数据分析中可能会用到的函数. fread 做基因组数据分析时,常常需要读入处理大文件,这个时候我们就可以舍弃read.ta

R语言︱异常值检验、离群点分析、异常值处理

在数据挖掘的过程中,数据预处理占到了整个过程的60% 脏数据:指一般不符合要求,以及不能直接进行相应分析的数据 脏数据包括:缺失值.异常值.不一致的值.重复数据及含有特殊符号(如#.¥.*)的数据 数据清洗:删除原始数据集中的无关数据.重复数据.平滑噪声数据.处理缺失值.异常值等 缺失值处理:删除记录.数据插补和不处理 主要用到VIM和mice包 install.packages(c("VIM","mice")) 1.处理缺失值的步骤 步骤: (1)识别缺失数据: