小编Pla*_*oul的帖子

在R中将矢量拆分为不相等的块

我有同样的问题在这里,我除了要指定另一个向量变量分裂长度.所以,像这样:

example.data<-paste("ex",1:10,sep="")
example.data
 [1] "ex1"  "ex2"  "ex3"  "ex4"  "ex5"  "ex6"  "ex7"  "ex8"  "ex9"  "ex10"
split.lens <- c(4,2,1,3)
Run Code Online (Sandbox Code Playgroud)

应该给我以下列表:

result.list
[[1]]
[1] "ex1" "ex2" "ex3" "ex4"

[[2]]
[1] "ex5" "ex6"

[[3]]
[1] "ex7"

[[4]]
[1] "ex8"  "ex9"  "ex10"
Run Code Online (Sandbox Code Playgroud)

我无法弄清楚这样做的最好方法split.有任何想法吗?

谢谢!

split r

8
推荐指数
1
解决办法
1224
查看次数

fromJSON 中的多个 JSON 对象

我正在尝试fromJSON()读取具有多个对象的 .json 文件,其结构如下:

\n\n
{ "key11": value11, "key12": value12 }\n{ "key11": value11, "key12": value12 }\n\xe2\x80\xa6\n
Run Code Online (Sandbox Code Playgroud)\n\n

如果我手动[...]在整个文件周围添加括号,并,在对象之间添加逗号,则以下代码有效:

\n\n
json_file <- "file.json"\njson_data <- fromJSON(json_file,flatten=TRUE)\n
Run Code Online (Sandbox Code Playgroud)\n\n

但是添加括号和逗号对于我实际尝试做的事情来说是不可行的(我在示例文件上做到了)。

\n\n

我尝试使用readLines(),因为对象之间有换行符,但我没有得到任何结果。

\n\n

如何在不修改文件的情况下读取这些 json 对象?

\n

json r jsonlite

3
推荐指数
1
解决办法
2565
查看次数

使用粘贴列表

我试图理解strsplit和的paste函数,它们是反函数.但是,当我strsplit是一个向量时,会返回一个列表,如下所示:

> strsplit(c("on,e","tw,o","thre,e","fou,r"),",")
[[1]]
[1] "on" "e" 

[[2]]
[1] "tw" "o" 

[[3]]
[1] "thre" "e"   

[[4]]
[1] "fou" "r"  
Run Code Online (Sandbox Code Playgroud)

我试着使用lapply,以cat列表的元素重新走到一起,但它不工作:

> lapply(strsplit(c("on,e","tw,o","thre,e","fou,r"),","),cat)
on etw othre efou r[[1]]
NULL

[[2]]
NULL

[[3]]
NULL

[[4]]
NULL
Run Code Online (Sandbox Code Playgroud)

相同的公式paste而不是cat实际上什么也没做!为什么我得到这些结果?我怎样才能得到我想要的结果,这又是原始的矢量?

(显然,在我的实际代码中,我试图用更多的东西来做strsplit,cat而不仅仅是返回原始向量,但我认为这个问题的解决方案对我来说很有效.谢谢!)

r paste strsplit

1
推荐指数
1
解决办法
4273
查看次数

标签 统计

r ×3

json ×1

jsonlite ×1

paste ×1

split ×1

strsplit ×1