码迷,mamicode.com
首页 > 其他好文 > 详细

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

时间:2018-05-11 23:26:29      阅读:353      评论:0      收藏:0      [点我收藏+]

标签:存在   exce   tab   eps   clip   first   向量   atof   cto   

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

问题:导入 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()

另请参阅:

 

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

标签:存在   exce   tab   eps   clip   first   向量   atof   cto   

原文地址:https://www.cnblogs.com/li-20151130/p/9026568.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!