Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/67.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R sqldf在控制台和代码中给出不同的结果_R_Sqldf - Fatal编程技术网

R sqldf在控制台和代码中给出不同的结果

R sqldf在控制台和代码中给出不同的结果,r,sqldf,R,Sqldf,我的问题如下:当我在R Studio控制台和函数中运行相同的SQL查询时,我得到两个不同的结果,我希望有人能告诉我副作用来自哪里。正在使用的数据帧只包含3个字段(id、时间戳、集群) 我的职能如下: get_cluster_boundaries <- function(clustering_result) { library(sqldf) dfname <- deparse(substitute(clustering_result)) all_clusters <-

我的问题如下:当我在R Studio控制台和函数中运行相同的SQL查询时,我得到两个不同的结果,我希望有人能告诉我副作用来自哪里。正在使用的数据帧只包含3个字段(id、时间戳、集群)

我的职能如下:

get_cluster_boundaries <- function(clustering_result) {
  library(sqldf)
  dfname <- deparse(substitute(clustering_result))
  all_clusters <- sqldf(paste("SELECT DISTINCT(cluster) FROM ", dfname, sep=""))
  for(cluster_no in all_clusters) {
    lquery <- paste("SELECT min(timestamp) FROM ", dfname, " WHERE cluster = ", cluster_no, sep="")
    lower_end <- sqldf(lquery)
    uquery <- paste("SELECT max(timestamp) FROM ", dfname, " WHERE cluster = ", cluster_no, sep="")
    upper_end <- sqldf(uquery)
    print(paste("Cluster ", cluster_no, " starts from ", lower_end, " to ", upper_end, sep=""))
  }
}

get_cluster_bounders我猜,但我不能确定它是否有效,因为所有的_clusters都是一个data.frame,而不是一个向量。在sqldf帮助页面中,我们有

指定select语句的结果作为数据输出 框架

试一试

for (cluster_no in all_clusters[,1])
请复习。