R语言实战（第2版）——第1章-R语言介绍

软件的安装

• R软件(https://www.r-project.org/)

• RStudio(https://rstudio.com/)

• 先安装R，再安装RStudio，可自动装载R

R语言赋值：<-可通过“alt+-”同时打出

#1-1 10名婴儿的月龄和体重

age <- c(01,03,05,02,11,09,03,09,12,03)

weight <- c(4.4,5.3,7.2,5.2,8.5,7.3,6.0,10.4,10.2,6.1)

mean(weight)                       #体重均值

sd(weight)                            #体重标准差

cor(age,weight)                    #体重和月龄的相关系数

plot(age,weight)                   #体重和月龄的散点图

q()                                         #结束会话，退出

demo(persp)                         #查看立体图形的示例

demo(image)                        #查看热力图的示例

##强大的帮助支持功能

help.start()                            #打开帮助文档首页，完整的了解R, #http://127.0.0.1:29891/doc/html/index.html

help.search("foo")                #以foo为关键词搜索本地帮助文档

??foo

help("foo")                           #查看函数foo的帮助，引号可省略，会告诉你这个函数的由来和应用

?foo

example("foo")                    #函数foo的使用示例，引号可省略，会告诉你要跑出这个图怎么写

RSiteSearch("foo")               #以foo为关键词搜索在线文档和邮件列表存档

apropos("foo",mode="function")     #列出名称中含有foo的可用函数

data()                                   #列出当前已加载包中所含的可用示例数据集

vignette()                             #列出当前已安装包中所有可用的vignette文档

vignette("foo")                     #为主题foo显示指定的vignette文档

#工作空间：当前R的工作环境。当一个R对话结束时，可将workspace保存到一个镜像中，并在下次启动时自动载入。

#工作目录：R用来读取文件和保存结果的默认目录。如果需要调用一个不在当前工作目录下的文件，则需要在调用语句中写明完整的路径。

getwd()                                #显示当前的工作目录

setwd("mydirectory")          #修改当前的工作目录为mydirectory，一定不能用反斜杠\，要用/

ls()                                       #列出当前工作空间中的对象

rm(objectlist)                      #移除（删除）一个或多个对象

rm(list = ls())                       #魔幻操作，一键清除，清空环境变量

help(options)                      #显示可用选项的说明

options()                             #显示或设置当前选项

history(10)                          #显示最近使用的过的10个命令（默认值为25）

savehistory("myfile")          #保存命令历史到文件myfile中（默认为.Rhistory）

loadhistory("myfile")          #载入一个命令历史文件（默认为.Rhistory）

save.image("myfile")          #保存工作空间到文件myfile中（默认值为.RData）

save(objectlist,file="myfile")     #保存指定对象到一个文件中

load("myfile")                     #读取一个工作空间到当前会话中（默认值为.RData）

q()                                       #退出R。将会询问你是否保存工作空间

包的安装

#镜像地址可以根据你的习惯来更改,这里是

options(repos=structure(c(CRAN="http://mirrors.tsinghua.edu.cn/CRAN/")))

.libPaths()                        #用于显示库所在的位置

search()                           #显示哪些包已加载并可以使用

install.packages("gclus")    #安装包

library(gclus)                      #载入包

update.packages("gclus")  #更新包

installed.packages()           #列出已安装包、版本号及依赖关系

将输出用作输入：结果的重用

#查看R中的数据集

data()

lm(mpg~wt, data=mtcars)                #车身重量和每加仑行驶的英里数：简单线性回归

lmfit<-lm(mpg~wt, data=mtcars)     #在对象lmfit中保存结果

summary(lmfit)                                   #显示分析结果的统计概要

plot(lmfit)                                           #生成回归诊断图形

cook <- cooks.distance(lmfit)            #计算和保存影响度量统计量

plot(cook)                                           #绘图

predict(limfit,mynewdata)                  #在新的车身重量上预测mpg

#要了解某个函数的返回值，查阅这个函数在线帮助文档中的“value”部分即可

?lm

help(lm)

示例实践

help.start()                       #打开帮助文档首页

install.packages("vcd")    #安装vcd包

help(package="vcd")       #列出vcd包中可用的函数和数据集

library(vcd)                       #载入vcd包

help("Arthritis")                #阅读Arthritis数据集的描述

Arthritis                            #显示数据集的内容

example("Arthritis")         #运行数据集自带的示例，显示的是接受治疗的关节炎患者较接受安慰剂的患者在病情上有了更多改善

q()                                     #退出R

R编程中的常见错误

• 大小写错误

• 漏掉引号

• 漏掉括号

• 路径名使用了反斜杠\

• 使用了未载入包的函数