R:读取CSV列&写在另一栏

时间:2016-06-08 05:20:55

标签: r

在下面寻找一些建议: 读取Csv文件列并将第1行与row3合并为预期输出

CSV文件: 实际输出:

Source: Google          
#                           
Category    Orders   Conversion Visits
Mobiles  50507      5.10%   994251  

预期产出:

Category    Orders   Conversion Visits  Source
Mobiles          12957    1.70%       748276    Google

1 个答案:

答案 0 :(得分:0)

我们可以使用readLines

阅读
lines <- readLines("yourfile.txt")

使用str_extract

从第一行提取单词
library(stringr)
v1 <- str_extract_all(lines[1], "\\w+")[[1]]

阅读&#39;行&#39; 3到4作为带有read.tablecbind的数据框架,带有&#39; v1&#39;。

d1 <- read.table(text=lines[-(1:2)], header=TRUE)
cbind(d1, setNames(list(v1[2]), v1[1]))
#  Category Orders Conversion Visits Source
#1  Mobiles  50507      5.10% 994251 Google