5

下面是脚本

> library(sqldf)
> turnover = read.csv("turnover.csv")
> names(turnover)
[1] "Report.Date"       "PersID"            "Status"            "DOB"
[5] "Age"               "Tenure"            "Current.Hire.Date" "Term.Date"
[9] "Gender"            "Function"          "Grade"             "Job.Category"
[13] "City"              "State"             "Retiree"           "Race"
> turnover_hiredate = sqldf("select Status, Current.Hire.Date from turnover")

我收到一条错误消息：没有这样的列：Current.Hire.Date。但是这个变量被列为第 7 个变量。

我做错什么了？

4

3 回答 3

11

无需更改列名。

从 RSQLite 1.0.0 和 sqldf 0.4-9 开始，列名中的点不再转换为下划线。https://code.google.com/p/sqldf/

我们只需要在单引号之间写SQL语句，列名包括双引号或反引号/反引号之间的点可互换。

两个例子：

require(sqldf)
# 1
turnover <- data.frame(Status = c("A", "B", "C"), 
                       Current.Hire.Date = c("4/10/10", "13/11/10", "1/7/13"))
sqldf('select Status, "Current.Hire.Date" from turnover') 

#2. Double quotes and backticks interchangeably    
sqldf('select Species, avg("Sepal.Length") `Sepal.Length`, 
   avg("Sepal.Width") `Sepal.Width` from iris group by Species')

实现解决方案的另一种方法

#3 Using square brackets 
sqldf('select Species, avg([Sepal.Length]) `Sepal.Length`, 
   avg([Sepal.Width])  `Sepal.Width` from iris group by Species')
于 2015-03-04T20:17:35.820 回答
6

sqldf(...)不喜欢.列名中的（句点），因此您需要将其更改为其他内容。试试这个：

library(sqldf)
turnover = read.csv("turnover.csv")
colnames(turnover) <- gsub("\\.","_",colnames(turnover))
turnover_hiredate = sqldf("select Status, Current_Hire_Date from turnover")

原因是句号在 SQL 中用于表示表列，例如turnover.Status.

于 2014-05-04T00:27:27.287 回答
0

你也可以使用

library(sqldf)
turnover <- read.csv("turnover.csv", header=TRUE, check.names=FALSE) #Leave Names Alone

names(turnover) <- gsub(x = names(turnover),
                    pattern = " ",
                    replacement = "_")  # Replace Var Name blank with _
于 2018-06-13T00:20:42.423 回答