R中方括号csv中的多个值

R中方括号csv中的多个值,r,csv,square-bracket,multiple-value,R,Csv,Square Bracket,Multiple Value,我有一个如下的csv文件: 1556891503.326399;16384;340;48188.23529411765;[1618.377685546875, 1620.2911376953125, 1620.1904296874998, 1619.9386596679685, 1620.391845703125, 1620.2911376953125, 1620.794677734375, 1618.1762695312498, 1620.8450317382812, 1621.0968017

我有一个如下的csv文件:

1556891503.326399;16384;340;48188.23529411765;[1618.377685546875, 1620.2911376953125, 1620.1904296874998, 1619.9386596679685, 1620.391845703125, 1620.2911376953125, 1620.794677734375, 1618.1762695312498, 1620.8450317382812, 1621.0968017578125, 1620.3414916992188, 1620.7443237304685, 1620.391845703125, 1620.9457397460935,...]; 155689433.326399;16384;340;48188.23529411765;[1618.377685546875, 1620.2993876953125, 1620.1904296874998, 1619.9386596679685, 1620.391845703125, 1620.2911376953125..];...
 df1 <- data.frame(V1=c(1556891503,155689433),V2=c(16384,16384),V3=c(340,340),V4=c(12,12),V5=c("[12,12,12,23]","[8,8,8,8]"))

           V1    V2  V3 V4            V5
 1 1556891503 16384 340 12 [12,12,12,23]
 2  155689433 16384 340 12     [8,8,8,8]
共有5个功能,最后一个功能是方括号中一个单元格中的巨大传感器数据,并用逗号分隔。我想取平均值,mode,sd。。等等,但我不知道如何将其从括号中删除并进行分析。我尝试将其修改为字符串,但数据量大,处理时间长!
有更简单的方法吗?

这可能不是最好或最漂亮的方法,但下面的方法会起作用

不清楚您的文件是如何格式化的,但因为您说“有5个功能,最后一个是”,我假设您的数据如下所示:

1556891503.326399;16384;340;48188.23529411765;[1618.377685546875, 1620.2911376953125, 1620.1904296874998, 1619.9386596679685, 1620.391845703125, 1620.2911376953125, 1620.794677734375, 1618.1762695312498, 1620.8450317382812, 1621.0968017578125, 1620.3414916992188, 1620.7443237304685, 1620.391845703125, 1620.9457397460935,...]; 155689433.326399;16384;340;48188.23529411765;[1618.377685546875, 1620.2993876953125, 1620.1904296874998, 1619.9386596679685, 1620.391845703125, 1620.2911376953125..];...
 df1 <- data.frame(V1=c(1556891503,155689433),V2=c(16384,16384),V3=c(340,340),V4=c(12,12),V5=c("[12,12,12,23]","[8,8,8,8]"))

           V1    V2  V3 V4            V5
 1 1556891503 16384 340 12 [12,12,12,23]
 2  155689433 16384 340 12     [8,8,8,8]
然后,您可以使用strsplit(df$V5,split=“,”)将第5列拆分为数值

df$V6 <- strsplit(df$V5,split = ", ")
df$V6 <- sapply(df$V6, function(x) as.numeric(unlist(x)))

df$V6您能将数据读入R并在这里发布
dput(head(data))
吗?谢谢您的回答。该文件与您创建的完全相同。我尝试了你的代码,但在这部分我遇到了一个错误:dataPump$V6有一个输入错误,请尝试
sapply(数据泵$V6
strsplit
ed列现在是
V6
,而不是
V5
。我已经纠正了这个错误。我想错误的来源是不同的。
$中的错误你应该发布你的数据,因为使用你问题中的行,代码是有效的。他们关闭了主题,所以我不能再发布了,但我修改了它,然后is works:dataPump$V6