2017-04-07 42 views
1

我想創建一個列表,我可以複製到一個來自data.frame列的函數的搜索查詢。從下面的代碼我的輸出格式爲:使用dbhydroR包爲列創建一個列搜索查詢

‘C-484,''F-409,''S-18A,''G-850,''PB-632,'...etc. 

但我需要它來閱讀

'C-484','F-409','S-18A','G-850','PB-632', ...etc. 

有1,974變量。我怎樣才能用逗號切換每個變量的最後一個引用的位置?

inactivestations <- read.csv("INACTIVE_WELLS.csv",header=TRUE) 

#subset and make data.frame for only STATION (station names) 
allstations_inactive <- inactivestations['STATION'] 

#not separated in a way that can be copied into a query 
list(allstations_inactive$STATION) 

#separated by commas and has quotes around each variable but commas inside quotes 
test<-paste0(allstations_inactive$STATION, collapse="''",sep=",") 

##separated by commas and has quotes around each variable but commas inside quotes 
test1<-paste0(allstations_inactive$STATION, sep=",",collapse="''") 

預先感謝您

+0

這將是更容易幫助你,如果你提供帶有示例輸入數據的[可重現示例](http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example)噸。我不認爲我們需要所有2000個變量,只有少數人應該明白這一點。 – MrFlick

+0

我是R新手,這是我在堆棧溢出的第一天。你的編輯版本是否被認爲是一個可重複的例子?如果是這樣,它看起來與我最初發布的內容非常相似,並且我不清楚可重現示例的含義。除非你能爲我詳細說明,@MrFlick,否則我會進一步探討這一點。 – user3

+0

不,我沒有使其具有可重現性,我只是清理了格式,因此更易於閱讀。我提供的鏈接提供了包含問題數據的例子。請注意至少有一個答案以可以複製/粘貼到R運行的格式提供其自己的數據。這很理想。 – MrFlick

回答

1

這種方法的工作原理:

input <- c("C-484", "F-409", "S-18A", "G-850", "PB-632") 
output <- paste0("'", input, "'", collapse = ",") 
# cat(output) 
# 'C-484','F-409','S-18A','G-850','PB-632' 

因此,在特定情況下,它變成了:

test1 <- paste0("'", allstations_inactive$STATION, "'", collapse = ",")