溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊(cè)×
其他方式登錄
點(diǎn)擊 登錄注冊(cè) 即表示同意《億速云用戶服務(wù)條款》

R語言 字符串寫入文件

發(fā)布時(shí)間:2020-07-26 10:26:48 來源:網(wǎng)絡(luò) 閱讀:1814 作者:qizok 欄目:編程語言
out_con <- file("out.txt", "w")
write(sprintf("This is line %d.\n",1),out_con,append=T)
write("This is line 2.",out_con,append=T)
close(out_con)


或者

printer = file("out.txt","w")
writeLines("This is line.",con=printer,sep=" ")
writeLines("The same line.",con=printer)
close(printer)

參考:

http://grokbase.com/t/r/r-help/137hry3mga/r-writing-multiple-lines-to-a-file


也可以用sink

sink("tmp_out.txt")
con <- file("raw.txt", "r")
line <- readLines(con, n=1)
while(length(line) != 0) {
   c = unlist(strsplit(line, "\t"))
   if (c[1] == "Contig") {
          #k_test <- rbind(k_test, c)
          cat(line)
          cat("\n")
   }
   else if (as.numeric(c[1]) %in% g.out$name) { 
         ##a <- sapply(c, as.numeric)
         ##k_test <- rbind(k_test, a)
         cat(line)
         cat("\n")
   }
   line = readLines(con, n=1)
}
close(con)
sink()


向AI問一下細(xì)節(jié)

免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如果涉及侵權(quán)請(qǐng)聯(lián)系站長(zhǎng)郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI