r - Classify date/time by tidal states -


i want classify df1 date/time tidal states given in df2. thing df2 gives exact times when tide @ heighest high or low.

i want change classifies tidal height based on being within 3-hour interval either side of high , low tide.

 df1 <- data.frame(date_time = as.posixct(c("2015-09-06 09:00:00 bst", "2015-09-06 09:48:00 bst", "2015-09-06 10:37:00 bst", "2015-09-06 12:00:00 bst", "2015-09-06 12:48:00 bst","2015-09-06 13:35:00 bst")))  > df1             date_time 1 2015-09-06 09:00:00 2 2015-09-06 09:48:00 3 2015-09-06 10:37:00 4 2015-09-06 12:00:00 5 2015-09-06 12:48:00 6 2015-09-06 13:35:00  df2 <- data.frame(date_time = as.posixct(c("2015-09-06 07:09:00 gmt", "2015-09-06 13:18:00 gmt", "2015-09-06 19:52:00 gmt", "2015-09-07 02:01:00 gmt", "2015-09-07 08:28:00 gmt", "2015-09-07 14:43:00 gmt")), tide_state = c("low",  "high", "low",  "high", "low",  "high"))  df2             date_time tide_state 1 2015-09-06 07:09:00        low 2 2015-09-06 13:18:00       high 3 2015-09-06 19:52:00        low 4 2015-09-07 02:01:00       high 5 2015-09-07 08:28:00        low 6 2015-09-07 14:43:00       high

i've tried using findinterval():

df1$tides <- df2$tide_state[findinterval(x = df1$date_time, vec = df2$date_time)]

result:

df1           date_time tides 1 2015-09-06 09:00:00   low 2 2015-09-06 09:48:00   low 3 2015-09-06 10:37:00   low 4 2015-09-06 12:00:00   low 5 2015-09-06 12:48:00   low 6 2015-09-06 13:35:00  high

desired result: (based on tide being 3-hours either side of high , low.

df1  date_time tides     1 2015-09-06 09:00:00   low     2 2015-09-06 09:48:00   low     3 2015-09-06 10:37:00   high     4 2015-09-06 12:00:00   high     5 2015-09-06 12:48:00   high     6 2015-09-06 13:35:00   high

any appreciated


-

Comments

Post a Comment

Popular posts from this blog

python - How to insert QWidgets in the middle of a Layout? -

Image
i'm using qt framework build graphical user interface. use qgridlayout position qwidgets neatly. gui looks this: my application regularly adds new widgets gui @ runtime. these new widgets not added @ end of qlayout, somewhere in middle. the procedure bit cumbersome. applied on figure above, need take out widg_c , widg_d , ... qgridlayout. next, add widg_x and widg_y , , put other widgets again. how remove widgets qgridlayout: for in reversed(range(mygridlayout.count())): self.itemat(i).widget().setparent(none) ### as long you're dealing small amount of widgets, procedure not disaster. in application display lot of small widgets - perhaps 50 or more! application freezes second while procedure ongoing, annoying user. there way insert widgets somewhere in qlayout, without need take out other widgets? edit: apparently solution qvboxlayout simple. use function insertwidget(..) instead of addwidget(..) . docs can found link: http://doc.qt.io/qt-5/qboxlayou
Read more

python - serve multiple gunicorn django instances under nginx ubuntu -

i need serve 2 webs apps (django) on gunicorn under different domain names using nginx on ubuntu. started using tutorial: https://www.digitalocean.com/community/tutorials/how-to-set-up-django-with-postgres-nginx-and-gunicorn-on-ubuntu-16-04 it worked fine 1 using that. tried same thing second gives me 502 gateway second domain. tried following tutorial: http://michal.karzynski.pl/blog/2013/10/29/serving-multiple-django-applications-with-nginx-gunicorn-supervisor/ i'm @ part run gunicorn start script: sudo bin/gunicorn_start i response: starting webuildblack root traceback (most recent call last): file "/home/devin/webuildblack/bin/gunicorn", line 7, in <module> gunicorn.app.wsgiapp import run importerror: no module named 'gunicorn.app'; 'gunicorn' not package you have named program gunicorn.py gunicorn -package. rename file , remove gunicorn.pyc file.
Read more

module - Prestashop displayPaymentReturn hook url -

i new prestashop developer , trying create paymentmodule. have got show payment method can not proceed purchase because not know hot works. does know should redirect run hooddisplaypaymentreturn method? i happy if explain me complete navigation map make purchase. anyway, can find relation between hooks , pages? when have new module payment rely on simplest provided prestashop: bankwire. inside can find 3 hooks. hookpayment: public function hookpayment($params) { if (!$this->active) return; if (!$this->checkcurrency($params['cart'])) return; $this->smarty->assign(array( 'this_path' => $this->_path, 'this_path_bw' => $this->_path, 'this_path_ssl' => tools::getshopdomainssl(true, true).__ps_base_uri__.'modules/'.$this->name.'/' )); return $this->display(__file__, 'payment.tpl'); } hookdisplaypaymenteu: public fun
Read more