r - Convert quarter/year format to a date -

-

i created function coerce vector of quarters-years format vector of dates. 

.quarter_to_date(c("q1/13","q2/14")) [1] "2013-03-01" "2014-06-01"

this code of function.

.quarter_to_date <-   function(x){     ll <- strsplit(gsub('q([0-9])[/]([0-9]+)','\\1,\\2',x),',')      res <- lapply(ll,function(x){       m <- as.numeric(x[1])*3       m <- ifelse(nchar(m)==1,paste0('0',m),as.character(m))       as.date(paste(x[2],m,'01',sep='-'),format='%y-%m-%d')      })     do.call(c,res)   }

my function works fine looks long , little bit complicated. think should done in other packages( lubridate example) can't find it. can me simplify code please?

1) zoo package has "yearqtr" class. convert , "date" class:

library(zoo) x <- c("q1/13","q2/14")  as.date(as.yearqtr(x, format = "q%q/%y")) ## [1] "2013-01-01" "2014-04-01"

2) works last day of month instead of first:

as.date(as.yearqtr(x, format = "q%q/%y"), frac = 1) ## [1] "2013-03-31" "2014-06-30"

3) consider not converting "date" class @ , using "yearqtr" class directly:

as.yearqtr(x, format = "q%q/%y") ## [1] "2013 q1" "2014 q2"

Comments

Post a Comment

Popular posts from this blog

python - No exponential form of the z-axis in matplotlib-3D-plots -

-
Image
i have similar problem described in how prevent numbers being changed exponential form in python matplotlib figure : i don't want (in special case) weird scientific formatting of axis. problem different have problem @ z -axis. 2-d plots can use ax.get_yaxis().get_major_formatter().set_useoffset(false) . , there no function ax.get_zaxis() what use format z -axis same way? edit: example: from mpl_toolkits.mplot3d import axes3d import numpy np import sys import matplotlib import matplotlib.pyplot pyplot def func(xi, ti): res = 10e3 + np.cos(ti) * np.sin(xi) return res if __name__ == '__main__': timespacing = 20 timestart = 0 timeend = 1 time = np.linspace(timestart, timeend, timespacing) widthspacing = 50 widthstart = 0 widthend = 3 width = np.linspace(widthstart, widthend, widthspacing) reslist = [] matplotlib.rcparams['legend.fontsize'] = 10 fig = pyplot.figure() ax = fig.gca(projection = '3d...
Read more

php - Best Light server (Linux + Web server + Database) for Raspberry Pi -

-
i install web server database on raspberry pi (little computer). computer has 1gb ram. i want know best combination: linux distribution , web server , dbms run local server multiple users minimal latency, use php on server. , best settings performance , not have bugs (memory usage, disable plugin, disable service, etc)? i thought light debian , lighttpd server , sqlite database. solution? i think lighttpd + sqlite great choice. linux distro, debian @ centos or tiny core linux , although i'm not sure of compatibility pi. obviously, can't go wrong raspbian if want use in production , more stable performance, few more pi's , set them in cluster .
Read more

c# - "Newtonsoft.Json.JsonSerializationException unable to find constructor to use for types" error when deserializing class -

-
i developing app in xamarin android. have splash screen serialize class , pass mainactivity using intent . when try deserialize in mainactivity error message : "serializationexception unable find constructor use types" serialization : void loaddata() { currency currency = new currency(this); intent = new intent(this, typeof(mainactivity)); intent.putextra("currency", newtonsoft.json.jsonconvert.serializeobject(currency)); startactivity(intent); } deserialization : cur = newtonsoft.json.jsonconvert.deserializeobject<currency> (intent.getstringextra("currency")); // error here class constructor : public currency(context context) { thiscontext = context; } i began experiencing problem after added parameter context context constructor. has caused this? how can solve it? possible serialize/deserialize class has parameters? you need have empty constructor in currency class in order deserialize it. ...
Read more