如何使用readr将.txt文件读入数据帧？

我使用

readr

txtread<-read_lines("expenses_copy1.txt")
txtread

[1] "Amount:Category:Date:Description"                                           
 [2] "5.25:supply:20170222:box of staples"                                        
 [3] "79.81:meal:20170222:lunch with ABC Corp. clients Al, Bob, and Cy"           
 [4] "43.00:travel:20170222:cab back to office"                                   
 [5] "383.75:travel:20170223:flight to Boston, to visit ABC Corp."                
 [6] "55.00:travel:20170223:cab to ABC Corp. in Cambridge, MA"                    
 [7] "23.25:meal:20170223:dinner at Logan Airport"                                
 [8] "318.47:supply:20170224:paper, toner, pens, paperclips, tape"                
 [9] "142.12:meal:20170226:host dinner with ABC clients, Al, Bob, Cy, Dave, Ellie"
[10] "303.94:util:20170227:Peoples Gas"                                           
[11] "121.07:util:20170227:Verizon Wireless"                                      
[12] "7.59:supply:20170227:Python book (used)"                                    
[13] "79.99:supply:20170227:spare 20\" monitor"                                   
[14] "49.86:supply:20170228:Stoch Cal for Finance II"                             
[15] "6.53:meal:20170302:Dunkin Donuts, drive to Big Inc. near DC"                
[16] "127.23:meal:20170302:dinner, Tavern64"                                      
[17] "33.07:meal:20170303:dinner, Uncle Julio's"                                  
[18] "86.00:travel:20170304:mileage, drive to/from Big Inc., Reston, VA"          
[19] "22.00:travel:20170304:tolls"                                                
[20] "378.81:travel:20170304:Hyatt Hotel, Reston VA, for Big Inc. meeting" 

---

txtreadIf您只需要data.frame使用
dataIf您只需要data.frame使用
data
for (i in length(txtread) ) {
  data<-read.table(textConnection(txtread[[i]]))
  print(data)
}