试图创建一个从数据库返回数据的函数。在表中使用时,它仅在第一行上起作用。
> library(RODBC)
> f1 <- function(p){return (paste(p, "+", sep=""))}
> f2 <- function(p){
h <- odbcConnect("dsn")
r <- sqlQuery(h, paste("select '", p, "' + '+'", sep=""))
return (r[1])
}
> x <- data.frame(p = c("a", "b"))
> data.frame(x, p2 = f1(x$p))
p p2
1 a a+
2 b b+
> data.frame(p = x$p, p2 = f2(x$p))
p Var.2
1 a a+
2 b a+
Warning message:
In data.frame(p = x$p, p2 = f2(x$p)) :
имена строк взяты из короткой переменной и поэтому сброшены
>
请给我解释我做错了什么。 谢谢
伊利亚
答案 0 :(得分:0)
我认为我需要做这样的事情:
{
"sid_1": "...",
"sid_2": "..."
}