Can you please explain elaborately! I understood that TRUE has been shifted ahead. But unfortunately did not understand the code- as how using logical vector it was shifted ? # lagged vector of id. TRUE is shifted one position aheadid.lag <- c(id[2:length(id)], FALSE)It shifted ahead twice using the code-id.lag <- c(id[3:length(id)], FALSE,FALSE) Thanking you again for your prompt response! > Date: Mon, 24 Aug 2015 17:55:28 +0200 > Subject: Re: [R] Understand Rcode- subset > From: thierry.onkel...@inbo.be > To: butt_its...@hotmail.com > CC: r-help@r-project.org > > # logical vector, TRUE when record_type equals 1 > id <- transact$record_type == 1 > # lagged vector of id. TRUE is shifted one position ahead > id.lag <- c(id[2:length(id)], FALSE) > sub <- transact[id.lag, ] > # have a look at the row numbers > transact[id, ] > sub > > Best regards, > ir. Thierry Onkelinx > Instituut voor natuur- en bosonderzoek / Research Institute for Nature > and Forest > team Biometrie & Kwaliteitszorg / team Biometrics & Quality Assurance > Kliniekstraat 25 > 1070 Anderlecht > Belgium > > To call in the statistician after the experiment is done may be no > more than asking him to perform a post-mortem examination: he may be > able to say what the experiment died of. ~ Sir Ronald Aylmer Fisher > The plural of anecdote is not data. ~ Roger Brinner > The combination of some data and an aching desire for an answer does > not ensure that a reasonable answer can be extracted from a given body > of data. ~ John Tukey > > > 2015-08-24 17:32 GMT+02:00 Jhon Grey <butt_its...@hotmail.com>: > > Hi! > > > > Thanks for pointing out the mistake. > > > > I am resubmitting my question as follows: > > > > Hi! > > I am facing a problem in understanding the R-Code > > Suppose I have a transactional dataset named- "transact" with its values > > like following: > > customer_ID > > <-c(10000000,10000000,10000000,10000000,10000000,10000000,10000000,10000000,10000000,10000005,10000005,10000005,10000005,10000005,10000005,10000007,10000007,10000007,10000007,10000007,10000007,10000007,10000007,10000013,10000013) > > shopping_pt <- c(1,2,2,3,4,5,6,7,8,9,1,2,3,4,5,6,1,2,3,4,5,6,7,8,1,2) > > record_type <- c(0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,1,0,0,0,0,0,0,0,1,0,0) > > transact <- data.frame(customer_ID, shopping_pt, record_type) > > > > How does the following code work > > id<-transact$record_type==1 > > sub<-transact[c(id[2:length(id)],FALSE),] > > id<-c(id[3:length(id)],FALSE,FALSE) > > sub2<-transact[id,] > > Thanks in advance! > > > >> Date: Mon, 24 Aug 2015 15:25:09 +0200 > >> Subject: Re: [R] Understand Rcode- subset > >> From: thierry.onkel...@inbo.be > >> To: butt_its...@hotmail.com > >> CC: r-help@r-project.org > > > >> > >> Posting in HTML mangles up your code, making it hard to read. Please > >> resend your question in plain text and make the code reproducible. See > >> http://adv-r.had.co.nz/Reproducibility.html for more details on that. > >> ir. Thierry Onkelinx > >> Instituut voor natuur- en bosonderzoek / Research Institute for Nature > >> and Forest > >> team Biometrie & Kwaliteitszorg / team Biometrics & Quality Assurance > >> Kliniekstraat 25 > >> 1070 Anderlecht > >> Belgium > >> > >> To call in the statistician after the experiment is done may be no > >> more than asking him to perform a post-mortem examination: he may be > >> able to say what the experiment died of. ~ Sir Ronald Aylmer Fisher > >> The plural of anecdote is not data. ~ Roger Brinner > >> The combination of some data and an aching desire for an answer does > >> not ensure that a reasonable answer can be extracted from a given body > >> of data. ~ John Tukey > >> > >> > >> 2015-08-24 13:00 GMT+02:00 Jhon Grey <butt_its...@hotmail.com>: > >> > Hi! > >> > I am facing a problem in understanding the R-Code > >> > Suppose I have a dataset named- transact with its values like following: > >> > > >> > > >> > > >> > > >> > > >> > customer_ID > >> > shopping_pt > >> > record_type > >> > > >> > > >> > 10000000 > >> > 1 > >> > 0 > >> > > >> > > >> > 10000000 > >> > 2 > >> > 0 > >> > > >> > > >> > 10000000 > >> > 3 > >> > 0 > >> > > >> > > >> > 10000000 > >> > 4 > >> > 0 > >> > > >> > > >> > 10000000 > >> > 5 > >> > 0 > >> > > >> > > >> > 10000000 > >> > 6 > >> > 0 > >> > > >> > > >> > 10000000 > >> > 7 > >> > 0 > >> > > >> > > >> > 10000000 > >> > 8 > >> > 0 > >> > > >> > > >> > 10000000 > >> > 9 > >> > 1 > >> > > >> > > >> > 10000005 > >> > 1 > >> > 0 > >> > > >> > > >> > 10000005 > >> > 2 > >> > 0 > >> > > >> > > >> > 10000005 > >> > 3 > >> > 0 > >> > > >> > > >> > 10000005 > >> > 4 > >> > 0 > >> > > >> > > >> > 10000005 > >> > 5 > >> > 0 > >> > > >> > > >> > 10000005 > >> > 6 > >> > 1 > >> > > >> > > >> > 10000007 > >> > 1 > >> > 0 > >> > > >> > > >> > 10000007 > >> > 2 > >> > 0 > >> > > >> > > >> > 10000007 > >> > 3 > >> > 0 > >> > > >> > > >> > 10000007 > >> > 4 > >> > 0 > >> > > >> > How does the following code work and the results of sub and id- > >> > > >> > id<-transact$record_type==1sub<-train[c(id[2:length(id)],FALSE),]id<-c(id[3:length(id)],FALSE,FALSE) > >> > sub2<-train[id,] > >> > Thanks in advance! > >> > > >> > [[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. [[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.
