问题描述
我目前正在使用BORIS视频分析中的R中的行为数据。每次观察都是15秒,在观察过程中,我记录了主题,其行为以及一些背景信息,例如日期,一天中的时间,温度等。但是,程序将该背景信息放在“行为”列下(因此,其中一种行为现在是“日期”,其输出在“修饰符”列下(例如现在显示为“ 15-10-2020”)。
我想要的是在日期,时间等字段中添加更多列(从“行为”列中获取),并将其输出(从“修饰符”列中)添加到这些列中,以便每个行为都有一个主题,日期,时间,温度等。但是我不知道该怎么做。
我考虑过使用函数聚合,但是这给了我很多额外的行,主要是NA。我也查看了“ tibble”包,但也不能真正使它工作。
任何建议将不胜感激!
一些示例行(来自dput()):
structure(list(Subject = structure(c(2L,2L,7L),.Label = c("fallow deer female","fallow deer female + calf","red deer female + calf","roe deer male","wild boar + young","wild boar male","wild boar unkNown sex"),class = "factor"),Behavior = structure(c(1L,8L,7L,12L,3L,5L,10L,6L,4L),.Label = c("auditory vigilant","date","day/night","foraging","nr. of individuals","running","temperature","time of day","unkNown behavIoUr","walking","walking while vigilant","weather"),Behavioral.category = structure(c(4L,4L,3L),.Label = c("","Background information","Non-vigilant","Vigilant"),Modifiers = structure(c(1L,21L,27L,35L,36L,32L,1L,1L),"0346","0347","07172020","07182020","07212020","07242020","07262020","07272020","08032020","08052020","1","12","1307","1327","1342","1343","1430","1528","16","1604","17","1744","21","2119","2120","22","23","25","26","3","4","7","Clear","Cloudy","Day","Night"),class = "factor")),row.names = c(NA,10L),class = "data.frame")
我想要的输出将作为列名给出:Subject;行为;日期;一天中的时间;温度。修改器输出将是“日期”,“一天中的时间”,“温度”列的值。当这种方法有效时,我可以删除列修饰符(因为它的所有值已经在分配的列中)。
解决方法
将数据框拆分为实际行为和背景信息。在背景信息上执行以下代码:
tidyr::pivot_wider(your_data,names_from = Behavior,values_from = Modifiers)
合并数据框!