作者nina8598 (Nina)
看板R_Language
标题[问题] csv储存格存成记事本txt档
时间Wed Feb 28 13:30:51 2018
[问题类型]:
程式谘询(我想用R 做某件事情,但是我不知道要怎麽用R 写出来)
[软体熟悉度]:
新手(没写过程式,R 是我的第一次)
[问题叙述]:
有个csv档(约三万笔资料)
no id time message
1 12345 2016-07-07T02:07:15+0000
Sounds great!
2 67890 2016-07-07T02:12:14+0000
Good good eat!
3 66666 2016-07-07T02:28:44+0000
I like it.
. . . .
. . . .
30000 34567 2017-11-01T09:47:53+0000 The end~
我想做的是,把message那栏的每个储存格都存成一个txt档,
例如
Sounds great! >> 1.txt
Good good eat! >> 2.txt
I like it. >> 3.txt
.
.
The end~ >> 30000.txt
请问应该怎麽做?
感谢各位大神了~
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 101.8.152.63
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1519795854.A.45C.html
1F:推 sw52099: for(i in 1:length(data$message)){ 02/28 13:41
2F:→ sw52099: path = paste0('~/your path/', i, '.txt') 02/28 13:41
3F:→ sw52099: write.table(data$message[i], path) 02/28 13:41
4F:→ sw52099: } 02/28 13:41
5F:→ celestialgod: 楼上的write.table改成write可能比较合适 02/28 13:59
6F:→ nina8598: 谢谢各位~~问题解决了!我最後是用write.table这个函数, 02/28 14:54
7F:→ nina8598: 因为我用write的话输出的记事本内容是"1" "2" "3"..., 02/28 14:54
8F:→ nina8598: 不是我要的message内容,还是谢谢大家! 02/28 14:54
9F:→ clansoda: 我比较好奇创造出三万个TXT会怎麽样 02/28 15:02
10F:→ celestialgod: 那是因为write的输出跟输入跟write.table相反= =" 02/28 15:27
11F:→ celestialgod: 我记错了@@ 02/28 15:28
12F:→ celestialgod: 喔喔,因为data$message是factor阿... 02/28 15:28
13F:→ celestialgod: 我会推荐write原因是因为write.table会输出 02/28 15:29
14F:→ celestialgod: rownames跟colnames,write就可以直接避免掉了 02/28 15:29
15F:推 sw52099: 原来如此,谢谢c大指教! 03/01 13:54