我有一个有点复杂的数据框,其中每行都是一个列表,每列代表一个不同的变量,如下图所示.
https://i.stack.imgur.com/2FeH4.png个
我想使用以下代码打印特定变量周围信息的.txt文件.
#LOAD THE DATA IN
library(raveio)
base :: setwd("path")
filenames <- base::list.files(
path = ("path"), # Insert your relevant filepath here
recursive = TRUE,
pattern = "*.mat"
)
#CONVERT DATA TO LIST
mylist <- lapply(filenames, function(x) read_mat(x))
#CONVERT LIST TO DATAFRAME
library(tidyverse)
mydata <- map_dfr(mylist, ~as.data.frame(t(.)))
#WRITE DATA TO .txt FILE
sink("mydata.txt")
print(mydata$stim)
sink()
但是,使用此代码会生成以下链接中所示的.txt文件.
https://i.stack.imgur.com/ggYTj.png个
我希望显示与rtStart等变量相关联的值,而不是只显示"数字",但我不确定如何操作.它可以很好地与"p"变量配合使用,但不适用于"stim".我try 了取消嵌套并使用unlist函数,但无济于事.
例如,我希望输出文件如下所示:
001
rtStart 8867
rtEnd 90382
Category 1
...
以此类推,适用于每个科目