r - 将项目粘贴到某些项目包含矢量的列表中

Question

我正在尝试为 API 构建查询，并且我有一个函数，它是我在列表中的参数和值。如果我的一些参数有多个值，我就会遇到问题。例如，

paramlist1 <- list(
  a = "1",
  b = "2",
  c = "3",
  d = "4"
)
paste(names(paramlist1), "=", paramlist1, collapse = "&", sep="")

工作正常。但是我有一些参数可以包含多个值。例如，

paramlist2 <- list(
  a = "1",
  b = "2",
  c = c("3", "4"),
  d = c("5", "6")
)

我希望返回 2 个字符串:a=1&b=2&c=3&d=5 和 a=1&b=2&c=4&d=6

也许我创建此参数列表的方法不是最好的。谢谢

Answer 1

您需要重复较短的向量，使其与较长的向量具有相同的长度。一种方法是将列表转换为 data.frame，然后您可以应用您的 paste 函数到每一行:

myfun <- function(x) paste(names(x), "=", x, collapse="&", sep="")

apply(as.data.frame(paramlist2), 1, myfun)