R語言做數據分析(8)_數據的輸入與輸出之READ函數_數據分析師

read.table() 函數
1、用于讀入表格（表）類型的數據，同時生成數據框對象。
2、讀入的數據要求有規則的分隔符，默認有：空格、TAB、換行符、回車符；其它的分隔符，通過sep=來進行指定。

read.table(file, header = FALSE, sep = "", quote = "\"'",
           dec = ".", row.names, col.names,
           as.is = !stringsAsFactors,
           na.strings = "NA", colClasses = NA, nrows = -1,
           skip = 0, check.names = TRUE, fill = !blank.lines.skip,
           strip.white = FALSE, blank.lines.skip = TRUE,
           comment.char = "#",
           allowEscapes = FALSE, flush = FALSE,
           stringsAsFactors = default.stringsAsFactors(),
           fileEncoding = "", encoding = "unknown")

1. file：指定讀入的文件，或者文件所在地址；
2. header：是否讀入列名，默認是不讀入；
3. sep：來進行指定分隔符：讀入的數據要求有規則的分隔符，可以是：空格、TAB、換行符、回車符；
4. as.is：讀入的字符是否轉換成因子，默認所有讀入的字符都轉換成因子；
5. colClasses：指定列的數據類型格式
6. header=TRUE 第一行是否是列的名稱，默認是TRUE
7. stringsAsFactors= 是否字符轉化成因子，默認是true
8. row.names=c()指定各行的名稱
9. col.names=C（）指定列的名稱，如果讀入是文件沒有頭，可以指定
10. skip=N 從文件第幾行開始讀入數據
11. nrows=N 讀入的最大行數
12. na.strings=c()指定什么樣的字符表示值缺少
13. comment.char=‘’ 指定評論的開始字符，默認是#
14. dec= 指定小數點數
15. encoding=指定非non-ASCII的編碼規則

例如：
demo_3<-read.table('e:/demo_3.txt',header=T)

 
read.fwf（）函數
1、適用用于讀入數據相應沒有相應的分隔符，但是讀入的數據字段長度是固定長度。
2、數據導入R后，生成列表對象。
讀入固定分隔長度的數據；

read.fwf(file, widths, header = FALSE, sep = "\t",
         skip = 0, row.names, col.names, n = -1,
         buffersize = 2000)

1. file:指定讀入的文件，或者文件所在地址；
2. widths：指定分隔的長度，可以等于向量指定不同的分隔；
3. buffersize：一次最大的讀入行數；
4. n:讀入數據的行數，默認為無數；

例如：在這個數據中，前面的3個字符與接下來的3個數字表示名稱、得分，因為二個字段之間沒有分隔符號，但其長度是固定的，所以適合用本函數。
ABC123%$12
TEX124@#12
y o14 @@#
read.fwf('e:/demo_1.txt',widths=c(3,3),col.names=c('name','score'));

w <- readline()函數
1、用于程序的交互，根據輸入的條件來判斷下一步執行的方向；
2、通過鍵盤讀入一行數據；
例如：根據輸入的來判斷后續程序的執行流程

Demo_2<-function()
{
         input<-readline("DO you think R is hard to learn,Please give your choice:Y or N ")
         if(input=="Y")
                   cat("Come on; Spent more time.\n")
         else
                   cat("Good!")
}
 

Demo_2()

Readlines() 函數
1、控制讀入的數據行數，非批處理，有點類似于數據庫中的指標操作，可對文件中的數據逐行操作。2、這個對于讀入日志類的數據很有用。例如：通過對讀入數據的每行來判斷是否有需要的數據，有再對數據進行處理；tips:該數據配合R中的正則表達式相關函數，對于處理不規則的數據很強大。
例如：
1、  與文件demo_1建立連接
con<- file("demo_3","r")
2、指定每次執行只讀入一行；
RC<-readLines(con,n=1)
3、關閉聯接
close(con)
 
說明：
1、如果讀到文件的最后，則length(RC)=0；EOF文件最后返回的空值。
2、N控制每次讀入幾行；
3、當讀到最后要重新開始的時間：seek(con=c,where=0)，返回當前指標所有的位置