R语言笔记-创新互联

最近做的几个项目都是用R语言来完成的。正如老师所说，学起来很快，忘起来也很快。整理一下放在这里，方便以后查阅。
安装所需的包：
install.packages("xxxx")
加载包：
library("xxxx")
显示/改变工作目录
getwd()/setwd("d:/temp")
文件操作：
1.读取csv文件
var=read.csv("demo.csv",header=FALSE)——header表示是否有表头，默认为TRUE
2.读取数据文件
data=read.table("demo.data")
3.读取文本文件
var=readLines("demo.txt",encoding="UTF-8")
4.输出csv文件
write.csv(var,"var.csv")
5.输出普通文本文件
write(var,"var.txt")
6.把整个运行空间保存到文件
save.p_w_picpath("demo.RData")
7.读取文件到运行空间
load("demo.RData")
清除运行空间全部变量：
rm(list=ls())
字符串操作：
1.获取字符串长度
nchar("asdf")——与length是不同的
2.连接字符串
paste("abc","def")——默认用空格间隔，若取消间隔，可用参数sep=""
3.分割字符串
str1=strsplit("abc def"," ")——分割结果是list类型，如需转成向量使用str1=unlist(strsplit("abc def"," "))
4.字符串截取
substr("hello",2,3)——参数表示起止位置
5.字符串替代
gsub("a","c","asdfasdf")——把asdfasdf替换成csdfcsdf
6.字符串匹配
grep("oo",c("hello","world","good"))——搜索给定字符串中的特定表达式 ，返回其位置索引
集合（向量）操作：
1.求交集
intersect(c("a","b","c"),c("a","c","d"))
2.求并集
union(c("a","b","c"),c("a","c","d"))
3.求差集
setdiff(c("a","b","c"),c("a","c","d"))
4.向量去重
unique(c("a","b","a","c"))
5.向量排序
sort(c("a","b","a","c"))/rev(sort(c("a","b","a","c")))

另外有需要云服务器可以了解下创新互联cdcxhl.cn，海内外云服务器15元起步，三天无理由+7*72小时售后在线，公司持有idc许可证，提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案，具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势，专为企业上云打造定制，能够满足用户丰富、多元化的应用场景需求。