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()

另请参阅：