Hello Eric, thanks for the code, it seems to do something closer to what I
want. I generate JFM, FMA and so on, but it does not create the DJF at the
beginning. Any thoughts on that?
Kwesi
On Mon, Jan 30, 2017 at 6:01 PM, Erich Subscriptions <
erich.s...@neuwirth.priv.at> wrote:
> Using dplyr and magrittr you could do the following
>
>
> -=-=-=-=-
> library(dplyr)
> library(magrittr)
>
> mydata <- read.table(text="
> era...1. Node_freq MEI
> 1 1980-01-01 -0.389855332 0.3394196488
> 2 1980-02-01 -0.728019153 0.2483738232
> 3 1980-03-01 -1.992457784 0.3516954904
> 4 1980-04-01 0.222760284 0.5736836269
> 5 1980-05-01 0.972601798 0.6289249144
> 6 1980-06-01 0.570725954 0.5736836269
> 7 1980-07-01 -0.977966324 0.4120517119
> 8 1980-08-01 0.056128836 -0.0104418383
> 9 1980-09-01 0.987304573 -0.0687520861
> 10 1980-10-01 1.188242495 -0.1403611624
> 11 1980-11-01 1.693037763 -0.0963727298
> 12 1980-12-01 1.173539720 -0.2539126977
> 13 1981-01-01 0.423698206 -0.6140040528
> 14 1981-02-01 -2.208098481 -0.5209122536
> 15 1981-03-01 -0.786830252 0.1133395650
> 16 1981-04-01 -0.110502611 0.3302127675
> 17 1981-05-01 -1.272021820 -0.1894645290
> 18 1981-06-01 0.394292656 -0.3736021538
> 19 1981-07-01 1.452892441 -0.4032687711
> 20 1981-08-01 0.698150002 -0.4441882433
> 21 1981-09-01 0.997106423 -0.1720737534
> 22 1981-10-01 0.247264908 -0.2436828296
> 23 1981-11-01 0.771663876 -0.3909929295
> 24 1981-12-01 -0.316341458 -0.4943145967
> ")
>
> mydata %<>% mutate(Node_freq2=lead(Node_freq,1),Node_freq3=lead(Node_
> freq,2),MEI1=lead(MEI,1),MEI2=lead(MEI,3)) %>%
> select(1,2,4,5,3,6,7)
>
> -=-==-=
>
> check if mydata ist what you want
>
>
>
>
>
>
--
Try not to become a man of success but rather a man of value-Albert Einstein
University of Cape Coast|College of Agriculture and Natural Sciences|Department
of Physics|
Team Leader|Recycle Up! Ghana|Technology Without Borders|
Other emails: kwesi.quagra...@ucc.edu.gh|kwesi.quagra...@teog.de|
Mobile: +233266173582
Skype: quagraine_cwasi
Twitter: @Pkdilly
[[alternative HTML version deleted]]
______________________________________________
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.
