Hello everyone, I am using RMySQL for a project and I have to deal with a complicated query here it is :
tmp2 <-sprintf(paste("select Score from YR.Transcription_Factor inner join YR.Promoter on YR.Transcription_Factor. Promoter_idPromoter=YR.Promoter.idPromoter inner join YR.GP_BIS on YR.Promoter.idPromoter=YR.GP_BIS.Promoter_idPromoter inner join YR.Gene on YR.GP_BIS.Gene_idGene=YR.Gene.idGene inner join YR.Cluster on YR.Gene.Cluster_idCluster=YR.Cluster.idCluster where Cluster_Name='%s' AND Specie='%s' AND TF_Name='%s' AND YR.Promoter.Gene_Name in (",toto,")",sep="") ,as.character(TRIPLETS[j,1]),species[i,],as.character(TRIPLETS[j,3]), titi ) where toto and titi are temporary variables containing toto <- noquote(paste(rep(shQuote("%s"),length(in_cluster_tf1$Score)),collapse=",")) titi <- (paste(shQuote(in_cluster_tf1$Gene_Name),collapse=",")) the problem is in quotes ( ' ) and ( ` ) to make it simple how can I create a vector like this > Vector "A","B","C" .... from Initial Vector > Initial vector [1] "A" "B" "C" .. and then inject Vector to the query especialy after " Where X in ("A","B","C") I tried several methodes with sQuote, dQuote, shQuotes but it seems like I have a problem with that Any Idea ? Thanks -- ** [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.