R: 导入 csv 文件，导出到csv文件，；绘图后导出为图片、pdf等

###################################################

问题：导入 csv 文件

如何从csv文件中导入数据，？参数怎么设置？常用参数模板是啥？

解决方案：

yuan <- read.csv(file = "C:/Users/Administrator/Desktop/test1.csv",header = TRUE,sep = ",",dec = ".", stringsAsFactors = FALSE,na.strings = "NA",strip.white = TRUE)

yuan1 = yuan1_copy <- read.csv("C:/Users/Administrator/Desktop/test1.csv",header = TRUE,sep = ",",dec = ".",na.strings = "",strip.white = TRUE)

file = "", #文件的绝对路径或相对路径

header = FALSE, #文件首行是否为变量名，可用T或F

sep = ",", #变量间分割方式,CSV 为逗号分隔

dec = ".", #小数点的标示方式

stringsAsFactors = FALSE, #防止导入的数据转换为因子，默认为TRUE

na.strings = "", # na.strings = c("NA","") 把所有想变成NA的量都写在c()向量里。

strip.white = FALSE, #去掉每个变量值首位的空白

skip = 0, #跳过文件最开始的前n行（header不算在内）

nrows=10, #读取的最大行数

fileEncoding = "utf-8", #数据集中有中文时

comment.char = "#", #注释开始的标志符，防止将#解释为注释

blank.lines.skip = TRUE, #跳过空白行？

quote = "\"'" #引号的默认值是...

讨论扩展：

注意：常将read.table() 和 names(),str()函数一起先后使用，可以直接检查导入的数据是否正确。。

导入Excel中数据，选择想要的数据 Ctrl+c ，---> R中， datas <- read.delim("clipboard")

url <- "http://www.jaredlander.com/data/TomatoFirst.csv"

tomato <- read.table(file = url,header = TRUE,sep = ",")

另请参阅：

###################################################

问题：导出 csv 18.4.26

怎么将 R 中数据导出为 csv 文件？

解决方案：

write.csv(iris,file = "F:/r_test/the_write.csv",sep = ",",na = "NA",quote = TRUE,dec = ".")

write.csv(liang[,c(3:5)],file = "F:/r_test/the_write2.csv",sep = ",",na = "NA",quote = FALSE,append= FALSE)

#sep为分割；na为制定缺失值由什么代替；quote=FALSE:消除字符串分类变量的引号标志；append=FALSE:为写入到新的文件里，TRUE为追加到已有文件。

讨论扩展：

save(filename,) #以二进制保存对象

dump("x",”...”) #将对象 x 保存在”...”中

write.table(x,"clipboard",sep="\t",col.names=NA,) #将 x 写入内存剪切板，ctrl+v 可得

另请参阅：

###################################################

问题：导出图片 18.4.26

怎么将plot的绘图结果导出为 jpeg、png、eps、svg、pdf、等文件？

解决方案：

jpeg("file_name.jpeg",width = 700,height = 290)

plot()

dev.off() #关闭图像设备，同时储存图片

讨论扩展：

saveplot(file,type) #

另请参阅：

###################################################

问题：导出为pdf文件 18.4.26

怎么将plot的绘图结果导出为 pdf 文件？

解决方案：

jpeg("file_name.jpeg",width = 700,height = 290)

plot()

dev.off() #关闭图像设备，同时储存图片

讨论扩展：

saveplot(file,type) #

pdf("R_data10.pdf",width = 9,height = 5.5,family="GB1") #输出 pdf 文件，family="GB1" 可以显示中文。

# require(Cairo) #输出为pdf时，可灵活控制输出参数

# CairoPDF("plot1.pdf", 3.15, 3.15) #单位为英寸

# ggplot(data, aes(x = x, y = y)) + geom_line(size = 1) + theme_bw()

# dev.off()

另请参阅：