R中的数据帧从宽格式重组为两列
基利安·墨菲
我正在处理一个数据集，该数据集具有4列，这些列表示何时切割了某个森林补丁。
其中三列代表一年，每一行代表一个月。例如，栏：2015，行：1 = 2015年1月
最后一列是每个站点的唯一ID。
为了进行分析，我需要对数据进行重组，以使其成为2行，网站和剪切的日期格式。由于我们不知道确切的日期，我们选择了每月的15号作为代理。
我已附上数据照片和摘要。
我想要的最终结果是这样的
uniqueid <- c(21000, 23400, 26800)
cut <- as.Date(c('2015-1-15','2016-3-15','2017-3-15'))
stack_example <- data.frame(uniqueid, cut)
有人可以帮我重组数据，就像示例输出一样吗？
非常感谢你
<<<<编辑阿库伦>>>>>
dput(head(clf))
结构（列表（X2017 = c（NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_），X2016 = c（NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_，NA_integer_ ，NA_integer_，NA_integer_，NA_integer_ NA_integer_，NA_integer_），idunique = 1：6），row.names = c（NA，6L），class =“ data.frame”）
阿克伦
我们可以pivot_longer使用转换为长格式，然后使用pasteorstr_c或sprintf
library(dplyr)
library(tidyr)
library(stringr)
clf %>%
pivot_longer(cols = -idunique, values_drop_na = TRUE,
names_to = 'date', values_to = 'value') %>%
transmute(idunique, cut = sprintf('%s-%02d-15',
str_remove(date, '^X'), value))
# A tibble: 1 x 2
# idunique cut
# <int> <chr>
#1 3 2017-03-15
数据
# OP's dput showed all rows NA. So, added a value for test
clf$X2017[3] <- 3
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
在R中重组数据帧
- 2
R：覆盖从宽格式到长格式的数据帧
- 3
从宽到长收集数据帧，并使用R中的tidyverse生成新列
- 4
重塑R中的数据帧：从宽到长，但“可变”列的长度不相等
- 5
在 r 数据帧中重组/堆叠具有重复 ID 的列
- 6
将R中的数据帧重塑为宽格式
- 7
在R中将数据帧从宽变长
- 8
在R中将大型数据帧从宽变长
- 9
使用Tidyr在R中彻底重组数据帧
- 10
按列重组R中的数据框
- 11
R：将二维数据帧列表重组为一个数据帧
- 12
在R中重组数据
- 13
为 ggplot - R 安排数据帧格式
- 14
R：将数据列附加到频率帧基于两列的数据帧中
- 15
R：匹配不同数据帧中的两列，输出倍数
- 16
在R中拆分列名称并将数据从宽格式转换为长格式
- 17
将数据帧重塑为R中的列联表
- 18
将数据帧重塑为R中的列联表
- 19
如何从宽格式的数据中有效地在 R 中绘制大量图形？
- 20
将长格式数据帧转换为宽格式但保留 R 中的列数
- 21
在 R 中重组数据框
- 22
数据重组为面板格式 - 跨列提取单元格值
- 23
对两列进行排序，并使用pandas为数据帧中的排序值创建新列
- 24
R：根据列中的值合并两个数据帧，并返回两个数据帧的所有值
- 25
将数据从长格式重组为宽格式
- 26
R：对于数据帧中的两列数据，平均每小时15分钟的数据
- 27
数据帧恢复为R中的“列表”
- 28
将数据帧中的定界数据解析为R中的单独列
- 29
R - 为数据中的每两列执行函数
我来说两句