similar to: Remove

> On Dec 6, 2017, at 4:27 PM, Ashta <sewashm at gmail.com> wrote: > > Thank you Ista! Worked fine. Here's another (possibly more direct in its logic?): DM[ !ave(DM$x, DM$GR, FUN= function(x) {!length(unique(x))==1}), ] GR x y 5 B 25 321 6 B 25 512 7 B 25 123 8 B 25 451 -- David > On Wed, Dec 6, 2017 at 5:59 PM, Ista Zahn <istazahn at gmail.com> wrote:

> On Dec 8, 2017, at 4:48 PM, Ashta <sewashm at gmail.com> wrote: > > Hi David, Ista and all, > > I have one related question Within one group I want to keep records > conditionally. > example within > group A I want keep rows that have " x" values ranged between 15 and 30. > group B I want keep rows that have " x" values ranged

Hi David, Ista and all, I have one related question Within one group I want to keep records conditionally. example within group A I want keep rows that have " x" values ranged between 15 and 30. group B I want keep rows that have " x" values ranged between 40 and 50. group C I want keep rows that have " x" values ranged between 60 and 75. DM <-

> On Dec 8, 2017, at 6:16 PM, David Winsemius <dwinsemius at comcast.net> wrote: > > >> On Dec 8, 2017, at 4:48 PM, Ashta <sewashm at gmail.com> wrote: >> >> Hi David, Ista and all, >> >> I have one related question Within one group I want to keep records >> conditionally. >> example within >> group A I want keep rows that

Hi Ashta, There are many ways to do it. Here is one: vars <- sapply(split(DM$x, DM$GR), var) DM[DM$GR %in% names(vars[vars > 0]), ] Best Ista On Wed, Dec 6, 2017 at 6:58 PM, Ashta <sewashm at gmail.com> wrote: > Thank you Jeff, > > subset( DM, "B" != x ), this works if I know the group only. > But if I don't know that group in this case "B", how

You could make numeric vectors, named by the group identifier, of the contraints and subscript it by group name: > DM <- read.table( text='GR x y + A 25 125 + A 23 135 + A 14 145 + A 35 230 + B 45 321 + B 47 512 + B 53 123 + B 55 451 + C 61 521 + C 68 235 + C 85 258 + C 80 654',header = TRUE, stringsAsFactors = FALSE) > > GRmin <- c(A=15, B=40, C=60) > GRmax <-

> On Dec 6, 2017, at 3:15 PM, Ashta <sewashm at gmail.com> wrote: > > Hi all, > In a data set I have group(GR) and two variables x and y. I want to > remove a group that have the same record for the x variable in each > row. > > DM <- read.table( text='GR x y > A 25 125 > A 23 135 > A 14 145 > A 12 230 > B 25 321 > B 25 512 > B 25 123

subset( DM, "B" != x ) This is covered in the Introduction to R document that comes with R. -- Sent from my phone. Please excuse my brevity. On December 6, 2017 3:21:12 PM PST, David Winsemius <dwinsemius at comcast.net> wrote: > >> On Dec 6, 2017, at 3:15 PM, Ashta <sewashm at gmail.com> wrote: >> >> Hi all, >> In a data set I have group(GR)

Thank you Ista! Worked fine. On Wed, Dec 6, 2017 at 5:59 PM, Ista Zahn <istazahn at gmail.com> wrote: > Hi Ashta, > > There are many ways to do it. Here is one: > > vars <- sapply(split(DM$x, DM$GR), var) > DM[DM$GR %in% names(vars[vars > 0]), ] > > Best > Ista > > On Wed, Dec 6, 2017 at 6:58 PM, Ashta <sewashm at gmail.com> wrote: >> Thank

library(dplyr) DM <- read.table( text='GR x y A 25 125 A 23 135 . . . ) DM %>% filter((GR == "A" & (x >= 15) & (x <= 30)) | (GR == "B" & (x >= 40) & (x <= 50)) | (GR == "C" & (x >= 60) & (x <= 75))) On Fri, Dec 8, 2017 at 4:48 PM, Ashta <sewashm at gmail.com>

Hello, Try the following. keep <- list(A = c(15, 30), B = c(40, 50), C = c(60, 75)) sp <- split(DM$x, DM$GR) inx <- unlist(lapply(seq_along(sp), function(i) keep[[i]][1] <= sp[[i]] & sp[[i]] <= keep[[i]][2])) DM[inx, ] # GR x y #1 A 25 125 #2 A 23 135 #5 B 45 321 #6 B 47 512 #9 C 61 521 #10 C 68 235 Hope this helps, Rui Barradas On 12/9/2017 12:48 AM, Ashta

Thank you Jeff, subset( DM, "B" != x ), this works if I know the group only. But if I don't know that group in this case "B", how do I identify group(s) that all elements of x have the same value? On Wed, Dec 6, 2017 at 5:48 PM, Jeff Newmiller <jdnewmil at dcn.davis.ca.us> wrote: > subset( DM, "B" != x ) > > This is covered in the Introduction to

The model should be class aov or lm and my model class is aovlist. tried tidy from broom library but did not work. To make it class aov, I had to remove the error term; model <- aov(Rotationdata_R$`GY(Mg/ha)`~Rep+code*as.factor(Nitrogen),data=Rotationdata_R) Ahmed Attia, Ph.D. Agronomist & Soil Scientist On Mon, Dec 25, 2017 at 7:38 PM, David Winsemius <dwinsemius at

Thanks. I found that, and installed it and got the same message. Here: RTools version 3.4 install.packages("fAsianOptions_3010.tar.gz", dependencies=TRUE, repos=NULL, type = "source") Installing package into ?C:/Users/Tlk7/Documents/R/win-library/3.4? (as ?lib? is unspecified) Warning: invalid package 'fAsianOptions_3010.tar.gz' Error: ERROR: no packages specified

Rtools is not available for the current version of R. What I'm looking for is an alternative package or how others have managed to create workarounds. On Thu, Nov 2, 2017 at 4:25 PM, David Winsemius <dwinsemius at comcast.net> wrote: > > > On Nov 2, 2017, at 1:09 PM, Tiby Kantrowitz <tlkantro at gmail.com> wrote: > > > > Yes, that is exactly what I was doing

> On Apr 6, 2018, at 8:03 AM, David Winsemius <dwinsemius at comcast.net> wrote: > > >> On Apr 6, 2018, at 3:43 AM, g l <gnulinux at gmx.com> wrote: >> >>> Sent: Friday, April 06, 2018 at 5:55 AM >>> From: "David Winsemius" <dwinsemius at comcast.net> >>> >>> >>> Not correct. You already have

df is a data frame consisting of one variable (iso3 codes) such as USA RUS ARG BGD ITA FRA Some of these iso3 codes are repeated and I would like the corresponding continent name, the countrycode package does not seem to distinguish between North and South America. Thanks. Sincerely, Milu On Thu, Sep 7, 2017 at 9:00 PM, David Winsemius <dwinsemius at comcast.net> wrote: > > >

Yes, that is exactly what I was doing two days ago. Warning in install.packages : installation of package ?fAsianOptions_3010.79.tar.gz? had non-zero exit status Which is what a reading of the explanation for why "prob" was retired leads one to expect. Do you have some other suggestion about how to get it to work? I notice you're not using Windows which might have a relationship

> On Nov 2, 2017, at 3:46 PM, Tiby Kantrowitz <tlkantro at gmail.com> wrote: > > Thanks. I found that, and installed it and got the same message. Here: > > RTools version 3.4 > > install.packages("fAsianOptions_3010.tar.gz", I don't see a path to that file's location. The expansion from pkg_version.tar.gz might be automatic, but I do generally

> On Dec 25, 2017, at 2:09 PM, Ahmed Attia <ahmedatia80 at gmail.com> wrote: > > The model should be class aov or lm and my model class is aovlist. > tried tidy from broom library but did not work. To make it class aov, > I had to remove the error term; > > model <- aov(Rotationdata_R$`GY(Mg/ha)`~Rep+code*as.factor(Nitrogen),data=Rotationdata_R) You seemed to have