mysql - 如何使用 R 将列表放入数据库

Question

我不知道我的问题是否能代表我的需要

我有这个代码:

i<-0 j<-0

for(i in 0:m){   j<- j+1   neighborhood <- fn$sqldf("SELECT object2
  FROM distance WHERE object1=('$j') AND neighbor=TRUE UNION SELECT
  object1 FROM distance WHERE object2=('$j') AND neighbor=TRUE ")

for (neighbor in neighborhood){
  fn$sqldf(" INSERT INTO neighborhoods(object,neighborhood) 
             VALUES ('$neighbor','$neighbor')")

邻域结果为(8,10,11)

我想在表格邻域中获得结果，例如:

(1.1、2.2、3.3、4.4、5.5、6.6、7.7、8.8、8.10、8.11、9.9 等

但我总是在 postgresqlExecStatement(conn, statements, ...) 中收到此错误:

RS-DBI driver: (could not Retrieve the result : ERROR: invalid input syntax for integer: "c(8, 10, 11)" LINE 1: ...TO neighborhoods(object,neighborhood) VALUES ('8','c(8, 10, ... ^ )

我只是发现，如何通过这样的循环获得我想要的结果

i <- 0 j <- 1 for (i in 0:m){ core <- fn$sqldf("SELECT core FROM core_point WHERE gid=('$j')") if (core = FALSE){
fn$sqldf("insert into neighborhoods(object, neighborhood) values ('$j', '$j'") j<-j+1 } if (core ==TRUE){ neighborhood <- fn$sqldf("SELECT object2 FROM distance WHERE object1=('$j') AND neighbor=TRUE UNION SELECT object1 FROM distance WHERE object2=('$j') AND neighbor=TRUE ")

 a <-fn$sqldf("select totalneighborhoods from core_point where gid='$j'")
 a <- as.numeric(a)
 for(k in 1:a){
   o<- neighborhood[k,1]          
   fn$sqldf(" INSERT INTO neighborhoods(object,neighborhood) VALUES ('$j','$o')")
   k<- k+1
 }
 j<- j+1   } }

但我认为它会获得这个过程，你知道吗？ *抱歉，如果我的英语不好

Answer 1

试试这个:

a <- 8
b <- c(8,9,10)

paste(a,b,sep=".")  # If you need string output

as.numeric(paste(a,b,sep="."))   # If you need numeric output