day7 长脚本管理 数据框连接 取交集 其他一些函数

> 1. if条件语句管理：
if(F){
长脚本
} #要运行的时候F改成 T即可

> 2. 有多行代码时，分成多个脚本，每个脚本最后保存Rdata，下一个脚本开头清空再加载 
rm(list = ls()) #清空的函数
load("../..../....") #第一个..指的是上一级目录

k = iris
set.seed(28)
k1 = rnorm(4,2,5)
k2 = rnorm(4)
k3 = rnorm(4)
k4 = rnorm(4)
mix = data.frame(Sepal1=k1, Sepal2 = k2, Petal1=k3, Petal2=k4, Species="setosa")

merge(mix,k,"Species")
full_join() #全部都加进去（并集）没有的用NA填补
left_join() #按照靠左的数据框内容补齐
right_join() #按照靠右肝数据框内容补齐
inner_join() #取交集补齐

match() #匹配
order()  #返回排序后元素的位置(2,6,3,5)输出结果为（1,4,2,3）
dir() #获取指定目录中的文件和文件夹名称
file.create() #新建文件
file.excists() #检测是否存在文件
file.remove() #移除文件