search for: sheikhi

...s follow: ID    Visit xa1 xa2 yb1 yc23 yb33   I want to look at frequency of visit for ID and create a new column as response .  For example my response would be 2 for x and 3 for y. I think I need to write a loop, but I don't know how. I really appreciate your help. Thanks a lot. Best,Farnoosh Sheikhi [[alternative HTML version deleted]]

...follow: X         Z x1        102 x2        102 x2        102 x2        77 x3        23   I need to pivot this data as follows and assign the values based on frequency of column Z: X       Z.102   Z.77 Z.23 x1          1        0        0 x2          21  0 x3         00  1 Thanks. Best,Farnoosh Sheikhi [[alternative HTML version deleted]]

Hi, I have a column of DOB in mm/dd/yyyy. I want to convert this format to age. Thanks a lot.   Best,Farnoosh Sheikhi [[alternative HTML version deleted]]

...uot;9" ... dat1[,2:3]<- lapply(dat1[,2:3],as.numeric) ?str(dat1) #'data.frame':??? 5 obs. of? 3 variables: # $ V1: chr? "a" "b" "c" "d" ... # $ V2: num? 1 2 10 18 2 # $ V3: num? 6 7 8 9 10 A.K. ________________________________ From: farnoosh sheikhi <farnoosh_81 at yahoo.com> To: "smartpink111 at yahoo.com" <smartpink111 at yahoo.com> Sent: Monday, August 26, 2013 1:48 PM Subject: Loop for converting character columns to Numeric Hi there, I want to change the columns of my data from Character to numeric. Since the...

...Gender (200)    a                           daig1 b                           diag2 c                            diag1 I want to reformat this data to : ID   diag1 diag 2 diag 3..  diagx   proc1   proc2   proc3... procx  DOB  Gender a1011  20F Thanks a lot for your help and time.   Best,Farnoosh Sheikhi [[alternative HTML version deleted]]

Hi, I have a R output that looks as follow: Rad:0 Rad1:2 Rad3:3 I want to make a new matrix that looks like : sample size is 2400 Variable    n11  n12 Rad            0     2400-0=2400 Rad1          2       2400-2 Rad3  3      2400-3   Thanks a lot for your time and help:) Best,Farnoosh Sheikhi [[alternative HTML version deleted]]

...0<-lm(Y~1, data= mydata) fit.final<- lm(Y~X1+X2+X3+.....+X400, data=mydata) ??? step(fit0, scope=list(lower=fit0, upper=fit.final), data=mydata, direction="forward") step(fit.final, scope=list(lower=fit.final, upper=fit0), data=mydata, direction="backward")   Best,Farnoosh Sheikhi [[alternative HTML version deleted]]

...n 3500. I want to choose specific variables such as proc1 to proc1000 and Lab1 to Lab1600 and put it into a new matrix to run some correlation analysis. Since I have 3500 variables, I don't know from what column my lab or procedures start. I really appreciate your help. Thanks.   Best,Farnoosh Sheikhi [[alternative HTML version deleted]]

...#2nd method res<-data.frame(colSums(dat1)) ?names(res)<-"sum(n11)" ?res #???? sum(n11) #med1??????? 3 #med2??????? 1 #med3??????? 2 #3rd method ?do.call(rbind,lapply(dat1,sum)) #???? [,1] #med1??? 3 #med2??? 1 #med3??? 2 A.K. ________________________________ From: farnoosh sheikhi <farnoosh_81 at yahoo.com> To: arun <smartpink111 at yahoo.com> Sent: Monday, November 12, 2012 7:24 PM Subject: for loop Hi there, I want to calculate the odds ratio for a data like below. ?I want to compute the sum of each column as a new column and variable names as a new column....

Hi,? I have a data set with various date formats in one column and not sure how to unify it.Here is a few formats: 02091702/22/170221201703/17/160015-08-239/2/1500170806May-2-201522-March-2014 I tried parse_date_time from lubridate library but it failed.Thanks so much.?Best,Farnoosh [[alternative HTML version deleted]]

...<- join(dataNew1,DataB,by=c("Date.Accident","ID"),type="right") ?res1 #? Date.Accident ID Status #1????? 3-Sep-01? 1????? A #2???? 20-Jan-05? 1?? <NA> #3???? 26-Feb-04? 1????? C #4????? 6-Mar-02? 2????? A A.K. ________________________________ From: farnoosh sheikhi <farnoosh_81 at yahoo.com> To: "smartpink111 at yahoo.com" <smartpink111 at yahoo.com> Sent: Friday, April 12, 2013 5:40 PM Subject: Comparison of Date format ?Hi there, Hope all is well. I have a complicated data and I need to create a new variable based on the date...

...dta$DtStr, perl=TRUE ) dta$Dt[ idx ] <- as.Date( dta$DtStr[ idx ], format="%m%d%y" ) idx <- grepl( "^([1-9]|1[0-2])/[0-9]{1,2}/[0-9]{2}$", dta$DtStr, perl=TRUE ) dta$Dt[ idx ] <- as.Date( dta$DtStr[ idx ], format="%m/%d/%y" ) On Wed, 28 Jun 2017, Farnoosh Sheikhi via R-help wrote: > Hi,? > I have a data set with various date formats in one column and not sure how to unify it.Here is a few formats: > 02091702/22/170221201703/17/160015-08-239/2/1500170806May-2-201522-March-2014 > I tried parse_date_time from lubridate library but it failed.Thanks...

Hello, I have a data frame with 400 columns and wanted to filter character columns with "$" in it.For example:?>? x <- c("$5", "$89", "$10", "$34")??>? y <- c(1:4)>? My.Data <- data.frame (x,y)> My.Data? ? x y1? $5 12 $89 23 $10 34 $34 4 I want to detect the columns with $ and remove the $ from the selected columns.I have

...dta$DtStr, perl=TRUE ) dta$Dt[ idx ] <- as.Date( dta$DtStr[ idx ], format="%m%d%y" ) idx <- grepl( "^([1-9]|1[0-2])/[0-9]{1,2}/[0-9]{2}$", dta$DtStr, perl=TRUE ) dta$Dt[ idx ] <- as.Date( dta$DtStr[ idx ], format="%m/%d/%y" ) On Wed, 28 Jun 2017, Farnoosh Sheikhi via R-help wrote: > Hi,? > I have a data set with various date formats in one column and not sure how to unify it.Here is a few formats: > 02091702/22/170221201703/17/160015-08-239/2/1500170806May-2-201522-March-2014 > I tried parse_date_time from lubridate library but it failed.Thanks...

..., any) :    dim(X) must have a positive length I understood, I need to compute for CI for odds ratio which I have, but I don't know how to apply odds.ratio in this form. When I put odds.ratio=as.matrix(odds.ratio), my plot shows the numbers. I really appreciate your help. Thanks. Best,Farnoosh Sheikhi [[alternative HTML version deleted]]

...1e-05 #X3?????????? -1.9002023? 0.10667909 -17.81232 1.023637e-05 #X4??????????? 1.4421062? 0.09790384? 14.72982 2.606788e-05 #X7??????????? 0.5726324? 0.05396720? 10.61075 1.285606e-04 #X8?????????? -1.9560052? 0.14204298 -13.77052 3.625118e-05 A.K. ________________________________ From: farnoosh sheikhi <farnoosh_81 at yahoo.com> To: arun <smartpink111 at yahoo.com> Sent: Wednesday, November 21, 2012 2:47 PM Subject: update fit (removing insignificant variables) Hi there, I have a question for removing insignificant predictors from fit. The output looks like below but with 170 pred...

...),ID,FUN=function(x) c(diff(x),NA))),use.names=FALSE) #[1] 126 140 445 224? NA 715? NA #or unlist(lapply(split(dat1,dat1$ID),function(x) c(diff(as.Date(x$Date,format="%d-%b-%y")),NA)),use.names=FALSE) #[1] 126 140 445 224? NA 715? NA A.K. ________________________________ From: farnoosh sheikhi <farnoosh_81 at yahoo.com> To: "smartpink111 at yahoo.com" <smartpink111 at yahoo.com> Sent: Tuesday, July 23, 2013 3:11 PM Subject: subtracting rows for unique Hi there, Hope you are doing well. I have a data set which looks like below, I want to create a new variable (...

Hey, Are all the dates connected? So no comma or space btw? Regards, Christoph > On 29 Jun 2017, at 2:02 pm, Farnoosh Sheikhi via R-help <r-help at r-project.org> wrote: > > Hi, > I have a data set with various date formats in one column and not sure how to unify it.Here is a few formats: > 02091702/22/170221201703/17/160015-08-239/2/1500170806May-2-201522-March-2014 > I tried parse_date_time from l...

Hi Farnoosh, Perhaps this will help: drop_dollar<-function(x) return(as.numeric(as.character(gsub("\\$","",x)))) sapply(My.Data,drop_dollar) Jim On Thu, Apr 19, 2018 at 7:23 AM, Farnoosh Sheikhi via R-help <r-help at r-project.org> wrote: > Hello, > I have a data frame with 400 columns and wanted to filter character columns with "$" in it.For example: > x <- c("$5", "$89", "$10", "$34") > y <- c(1:4)> My.Data...

Left as an exercise for the student. -- Sent from my phone. Please excuse my brevity. On June 29, 2017 7:25:36 PM EDT, Farnoosh Sheikhi <farnoosh_81 at yahoo.com> wrote: >Thanks Jeff. This is a nice way of solving this problem. What about the >cases with 0015-02-21?Many thanks.?Best,Farnoosh > > > >On Wednesday, June 28, 2017 10:49 PM, Jeff Newmiller ><jdnewmil at dcn.davis.ca.us> wrote: > >...