R语言制作出版物在各国间的分布地图 r语言经典实例pdf

 1.1 R会话示例

age <- c(1,3,5,2,11,9,3,9,12,3)
weight <- c(4.4,5.3,7.2,5.2,8.5,7.3,6.0,10.4,10.2,6.1)
mean(weight)
[1] 7.06
sd(weight)
[1] 2.077498
cor(age,weight) #求相关系数矩阵
[1] 0.9075655
plot(age,weight)
q() #退出程序

1.2 图形演示

demo()
demo(Hershey)
demo(persp)
demo(image)

1.3 获取帮助

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

help("foo")
?foo         #查看函数foo的帮助（引号可省略）

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

example("foo")  #函数foo的使用示例（引号可以省略）

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

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

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

vignette()   #列出当前已安装包中所有可用的vignette文档（PDF格式的实用介绍性文章）
vignette("foo")  #为主题foo显示指定的vignette文档

1.4 工作空间

代码示例

setwd("C:/myprojects/project1")
options()  #显示选项设置情况
options(digits=3)  #显示三位有效数字
x <- runif(20)     #生成20个均匀分布的随机数
summary(x)         #摘要统计量
hist(x)            #直方图
q()                #退出程序

注意事项：

1. 路径中应使用正斜杠（/）或双反斜杠（\\）
2. 反斜杠（\）作为一个转义符
3. setwd()不会自动创建一个不存在的目录，需使用dir.create()来创建新目录
4. load(".RData")从上一次会话结束的地方重新开始

 1.5 输入和输出

#输入
source("myscript.R") #执行脚本，文件名不包含路径，则默认当前工作空间

#文本输出
sink("filename")     #输出重定向到文件filename，若文件已存在，则覆盖它的内容
#参数append=TRUE,追加文本
#参数split=TRUE，输出同时发送到屏幕和输出文件
#不加参数调用表示仅向屏幕返回输出结果

 #图形输出

 sink()对图形输出没有影响

dev.off()可将图片输出返回到终端

 1.6 包

包的定义

R函数、数据、预编译代码以一种定义完善的格式组成的集合

库的定义

计算机上存储包的目录

libPaths()  #显示库所在的位置
library()   #显示库中有哪些包

#包必须被载入到会话中才能使用
search()    #显示哪些包已加载并可使用

#包的安装
install.packages("gclus")  #安装包(引号必须有)
update.packages()          #更新已安装的包
installed.packages()       #列出安装的包，以及它们的版本号、依赖关系等信息

#包的载入
library(gclus)

#包的使用方法
help(package="package_name")   #括号必须有