A sentence A picture A day!

R Is Coming

写在前面的话： 看到了书中关于Winston Chang和动物“驯鹿”的介绍，记录一下^_^。

Winston Chang是一名工程师~~重点是他拥有美国西北大学的心理学博士学位。数据+心理的搭配有点妙。

“驯鹿”学名“角鹿”，他们的视力、皮毛、茸角、嗅觉、蹄子已经全然适应了低温环境。2012年英国伦敦大学学院研究者发现，驯鹿是唯一一种能够看见紫外线的哺乳动物。人类的视觉只能看到波长400nm以上的光线，驯鹿的视觉范围则低于320nm。虽然这一范围仅仅覆盖我们基于黑光帮助下所能看见的所有光谱的一部分，但足以帮驯鹿在北极的炽白光线中看清东西。会飞的驯鹿拉着圣诞老人的雪橇。

先简单介绍一下准备工作

1、安装R

2、安装R Studio

3、加载包

1
2

install.packages("ggplot2")
install.packages("gcookbook")

下载的二进制程序包在/var/folders/_h/r8xs1s7111z5dkhm642q83lr0000gn/T//RtmpBaf4d4/downloaded_packages里 【注：若有错误信息提示下载长度不等于报告长度—–>重新多下几次即可，网络问题】

4、使用包 >library(ggplot2)

关于help ?+要查的内容

>?read.table

ls(“package:foreign”)【包中函数列表】

加载数据

data<-read.csv("datafile.csv",header=FALSE,sep='\t',stringAsFactor=FALSE)【数据无首行列名】

name(data)<-c("Col1","Col1","Col3")重命名列 data$age<-factor(data$age)有些列需要被处理为因子格式

[install.packages(“xlsx”);library(xlsx)] data<-read.xlsx("file.xlsx",sheetIndex=2orsheetName="Score")

[install.package(“foreign”);library(foreign)] read.spss()、read.octave()、read.systat()、read.xport()…

绘图：

  1. 折线图
    • plot(pressure$temperature, pressure$pressure, type=“l”)

      points(pressure$temperature, pressure$pressure, col=“red”)

    • qplot(temperature, pressure, data=pressure, geom=c(“line”, “point”)
    • ggplot(pressure, aes(x=temperature, y=pressure)) + geom_line() + geom_point()
  2. 条形图