r - Time series of length 0 from the timeSeries package has dubious timestamps -

-

it seems "timeseries" of length 0 has 2 timestamps, 0 , 1. assignment of length 0 vector doesn't cause error message, number , values of timestamps unchanged. assignment of timestamps themselfs results in error message:

> library(timeseries)  > x <- timeseries( matrix(0:3,2,2) )  > settime(x) <- timesequence(as.date("2015-01-01"),as.date("2015-01-02"),by=as.difftime(1,units="days"))  > # --------------------- > # exspected: >  > head(x,2) gmt            ss.1 ss.2 2015-01-01    0    2 2015-01-02    1    3  > gettime(head(x,2)) gmt [1] [2015-01-01] [2015-01-02]  > nrow(head(x,2)) [1] 2  > length(gettime(head(x,2))) [1] 2  > # --------------------- > # exspected: >  > head(x,1) gmt            ss.1 ss.2 2015-01-01    0    2  > gettime(head(x,1)) gmt [1] [2015-01-01]  > nrow(head(x,1)) [1] 1  > length(gettime(head(x,1))) [1] 1  > # --------------------- > # not exspected: >  > head(x,0) gmt      ss.1 ss.2  > gettime(head(x,0)) [1] 1 0  > nrow(head(x,0)) [1] 0  > length(gettime(head(x,0))) [1] 2  > #==================================== >  > x0 <- head(x,0)  > # try assign vector of length 0 time(x0): > settime(x0) <- integer(0)  > gettime(x0)  # no success, neither error nor warning [1] 1 0  > #try assign current value of time(x0) itself: > settime(x0) <- gettime(x0) error: initialize timeseries : length of '@positions' not equal '@.data' extent

is bug in "timeseries" package?

from documentation of "timeseries" package learn "gettime" synonym "time". hence looking source code of function:

> getmethod("time",signature=c(x="timeseries")) method definition:  function (x, ...)  .time.timeseries(x, ...) <environment: namespace:timeseries>  signatures:         x            target  "timeseries" defined "timeseries"

so need source code of function, ".time.timeseries", used internally "timeseries" package:

> getanywhere(".time.timeseries") single object matching ‘.time.timeseries’ found found in following places   package:timeseries   namespace:timeseries value  function (x, ...)  {     if (length(x@positions) > 0)          timedate(x@positions, zone = "gmt", fincenter = x@fincenter)     else seq.int(nrow(x)) } <environment: namespace:timeseries> >

here see bug. "seq.int(nrow(x))" sequence 1,...,nrow(x)

  • in steps of 1, if nrow(x)>=1, but

  • in steps of -1, if nrow(x)<1.

hence in particular case, length of time series 0, value of "time" sequence "c(1,0)". 1 can fix follows:

seq.int(1,nrow(x),length.out=nrow(x))

gives rather correct value "integer(0)" if "nrow(x)" 0.


Comments

Post a Comment

Popular posts from this blog

html - Firefox flex bug applied to buttons? -

-
i'm trying apply flex button on firefox i'm having problem on chrome doesn't happens. this css: .button { display: inline-flex; align-items: center; } as can see in fiddle, "caret" word moved new line, happens if element <button> tag, <div> works expected. http://codepen.io/anon/pen/xblmgx is firefox bug or there css i'm missing? nevermind, looks "mr firefox" doesn't idea... <button> not implementable (by browsers) in pure css, bit of black box, perspective of css. means don't react in same way e.g. <div> would. this isn't specific flexbox -- e.g. don't render scrollbars if put "overflow:scroll" on button, , don't render table if put "display:table" on it. stepping further, isn't specific <button> . consider <fieldset> , <table> have special rendering behavior: data:text/html,<fieldset style="d...
Read more

html - Missing border-right in select on Firefox -

-
Image
when put select div width , padding-left, options have no border on right. more, happend if select have width 118px , parent have 15px of padding left! have idea, going on? my code: <!doctype html> <html> <head lang="en"> </head> <body> <div style="width: 1000px; padding-left: 15px;"> <select style="width: 118px;"> <option>a</option> <option>b</option> <option>c</option> </select> </div> </body> </html> and result: here plunker: click it happend on firefox on windows. tested on 40.0.2 version -webkit-box-sizing: border-box; -moz-box-sizing: border-box; -ms-box-sizing: border-box; box-sizing: border-box; source: https://stackoverflow.com/a/11390432/4431269 source of problem: https://bugzilla.mozilla.org/show_bug.cgi?id=924068 and use of google ! edit: (source of problem, explained) after rea...
Read more

python - build a suggestions list using fuzzywuzzy -

-
i building suggestion engine database. i'm using fuzzywuzzy module match user input string existing database shown below. if request.method == "get": display_dict = {} user_input = request.get["user_input"] # user input match_dict = {} food_items_obj = food_items.objects.all() # fetch objects table items in food_items_obj : match = fuzz.ratio(user_input.lower(),items.name.lower()) # try match user input existing names match_dict[match] = items.name # put 1 dictionary matched_dict = ordereddict(sorted(match_dict.items(),reverse = true)) # sort dictionary if max(matched_dict.keys()) == 100: # if exact match put in dict , return display_dict[100] = matched_dict[100] else : # if not found try best matching words.. ###########this part need help! ############# k,v in matched_dict.items(): if user_input in v : display_dict[k]...
Read more