Question

我正在尝试构建一个Web浏览器，它将通过许多网站并提取一些信息。为了做到这一点，我需要列出url中最后几个字符的列表，这样我就可以将信息映射到数据框中。为此，我发现url的末尾应该有一个介于1和10之间的数字来标识一个部门，以及一个给定的字符来标识一个单元。因此，我制作了两个带有所需单位和部门ID的向量：

departments <- c(1, 2, 9, 10)
units <- c("A", "B", "C", "F", "I", "O", "V")

要浏览每个网站，我需要一个列表，以每种可能的方式组合这两个向量，例如“1A”，“1B”，“1C”，“1F”，“1I”，“1O”， “1V”，“2A”等等。

I've tried different solutions, but they do not return what I expected, like for instance:
> depUn <- as.list(paste(departments, units, sep = ""))
> depUn
[[1]]
[1] "1A"

[[2]]
[1] "2B"

[[3]]
[1] "9C"

[[4]]
[1] "10F"

[[5]]
[1] "1I"

[[6]]
[1] "2O"

[[7]]
[1] "9V"

有人对我如何解决这个问题有任何好的见解吗？

修改我已经尝试过expand.grid选项了，虽然在列表中将元素放在一起成功后，它却无法将它们放在一个字符串中。有人可以帮我完成这个吗？这是我当时试过的代码和结果的摘录和摘录：

> dfDepUn <- expand.grid(departments, units)
> DepUn <- lapply(apply(dfDepUn, 1, identity), unlist)
> dfDepUn
[[1]]
Var1 Var2 
 "1"  "A" 

[[2]]
Var1 Var2 
 "2"  "A" 

[[3]]
Var1 Var2 
 "9"  "A" 

[[4]]
Var1 Var2 
"10"  "A"

Answer 1

这是你需要的吗？

df <- expand.grid(departments, units)
as.list(paste0(df$Var1, df$Var2))

将元素中的两个向量粘贴在一起

1 个答案: