代码之家 › 专栏 › 技术社区 › Jepessen

将单个观测数据重新排列为多个

split r

Jepessen · 技术社区 · 6 年前

我有以下格式的文本文件:

x1, y1, z1, x2, y2, z2, x3, y3, z3

如果我用 read.csv 我只观察了九个变量(在这个例子中,实际文件中三元组的数目是未知的)。

我想重新排列数据,以便用三个变量进行许多观察:

x1 y1 z1
x2 y2 z2
x3 y3 z3

所以我可以对每个三联体执行操作。

例如,我想转换这个

fileData <- read.table(text = "1 2 3 10 20 30 100 200 300")

> fileData
  V1 V2 V3 V4 V5 V6  V7  V8  V9
1  1  2  3 10 20 30 100 200 300

为此:

> fileData
   V1  V2  V3
1   1   2   3
2  10  20  30
3 100 200 300

我怎样才能把它分开?

2 回复 | 直到 6 年前

akash87 6 年前

不确定你的实际目标是什么,但使用基数r:

data.frame(matrix(fileData, ncol = 3, byrow = T))

这应该得到你想要的

   X1  X2  X3
1   1   2   3
2  10  20  30
3 100 200 300

Mark 6 年前

阿卡什给出了一个很好的答案,但是如果您有混合的数据类型(数字和字符),它可能不起作用,因为矩阵将强制所有的东西都是一种类型。另一种选择是如下 lapply 基于所需列数的索引。

fileData <- read.table(text = "m 2 3 a 20 30 cat 200 300")
rows = lapply(seq(3,ncol(fileData),by=3),
       function(x){
         range = paste("V",(x-2):x,sep="")
         output = fileData[,range]
         names(output) = c("x","y","z")
         return(output)
       })
do.call(rbind,rows)
#>     x   y   z
#> 1   m   2   3
#> 2   a  20  30
#> 3 cat 200 300

推荐文章

Marc B. · 使用ggplot2创建条形图时“缺少值”

1 年前

deschen · tidyverse与外部向量发生突变,该外部向量的元素是数据帧中的列值

1 年前

Laura · 在Shiny中使用可排序的包拖放名称,这些名称将成为图表

1 年前

Mallikarjun M · 如何使用随机森林进行时间序列预测?

1 年前

ly li · 模型摘要:当表格形状改变时,拟合优度消失

1 年前

C.Robin · 将marginaffects::predictions()的结果连接回main df?

1 年前

monotonic · 如何将格式为“col1+col3+col4”的数据帧的行名转换为一列数字向量“c(1,3,4)”?

2 年前

Shawn Hemelstrand · 为什么我的自定义errorbar函数不能在R中工作?

2 年前

RoyBatty · 统计每个字符在整个数据集中出现的次数

2 年前

stats_noob · R: 记录某个“行为”发生的循环的索引?

2 年前