> On Oct 12, 2016, at 11:20 AM, Ashta <sewa...@gmail.com> wrote: > > Hi David and all, > > I want run the following script in a loop but faced difficulty. > > trt=c(1,2,2,4,5,6,7,8) > for(i in 1:length (trt)) > { > try[i] <- (select trt, date1, date2, datediff(date1,date2) as > d12diff [i] from > dateTable where trt=[i]") > } > > I would appreciate if you point me the problem.

## Advertising

The problem(s) is/are that dbGetQuery is not being used and that even if it were used, it expects a character value as its second argument. -- David. > > Thank you in advance > > > On Sun, Oct 9, 2016 at 11:16 AM, David Winsemius <dwinsem...@comcast.net> > wrote: >> >>> On Oct 9, 2016, at 7:56 AM, Ashta <sewa...@gmail.com> wrote: >>> >>> I am trying to query data from Hive service and create a variable. >>> >>> >>> dbGetQuery(hivecon,"select date1, date2 from dateTable limit 10") >>> date1, date2, Diif >>> 4/5/1999, 6/14/2000 >>> 7/2/1999, 6/26/2000 >>> 8/14/1999, 8/19/2000 >>> 11/10/1999, 9/18/2000 >>> 8/25/2000, 6/5/2001 >>> 3/14/2012, 3/15/2004 >>> >>> >>> Here is what I wanted to do. While I am querying I want create a >>> variable diff= dat1e1-date2. >>> I may use this variable "diff" to do some statistics (mean, mode, >>> etc) and also in the where clause l like as the following. >>> >>> test_date=dbGetQuery(hivecon,"select date1, date2 from dateTable >>> where diff gt 1000 limit 10") >>> >>> I would appreciate if you suggest me how to do this. >> >> Sorry for the blank message earlier. My reading of the use of Hive queries >> is that you would need to use the `datediff` function. I further suspect you >> need to define a variable name to which then apply your limits. I also read >> that hive dates are actually strings types represented as POSIX style >> character values and might need a to_date funciton. This is all guesswork >> since I don't have a hive cluster to run this against: >> >> So perhaps something like one of these: >> >> try1 <- dbGetQuery(hivecon,"select date1, date2, >> datediff(TO_DATE(date1),TO_DATE(date2)) as d12diff from dateTable where >> d12diff GT 1000 limit 10") >> >> try2 <- dbGetQuery(hivecon,"select date1, date2, datediff(dat1,date2) as >> d12diff from dateTable where d12diff GT 1000 limit 10") >> >> Obviously these are just guesses. >> >> -- >> David. >>> >>> >>> >>> Here is the sample of the data and result >>> >>> date1, date2, Diif >>> 4/5/1999, 6/14/2000, -436 >>> 7/2/1999, 6/26/2000, -360 >>> 8/14/1999, 8/19/2000, -371 >>> 11/10/1999, 9/18/2000, -313 >>> 8/25/2000, 6/5/2001, -284 >>> 3/14/2012, 3/15/2004, 2921 >>> >>> Thank you in advance >>> >>> ______________________________________________ >>> R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see >>> 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. >> >> David Winsemius >> Alameda, CA, USA >> David Winsemius Alameda, CA, USA ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see 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.