search for: valkremk

...,header = TRUE,stringsAsFactors=FALSE) > preval<-data.frame(Col1=unique(unlist(mydat[,c("Col2","col3")]))[-1], > Col2=NA,col3=NA) > rbind(preval,mydat) > mydat[is.na(mydat)]<-"0" > > Jiim > > > On Sun, Feb 25, 2018 at 11:05 AM, Val <valkremk at gmail.com> wrote: > > Sorry , I hit the send key accidentally here is my complete message. > > > > Thank you Jim and all, I got it. > > > > I have one more question on the original question > > > > What does this "[-1] " do? > >...

...c("Col2","col3")])) > napos<-which(is.na(val23)) > preval<-data.frame(Col1=val23[-napos], > Col2=NA,col3=NA) > mydat<-rbind(preval,mydat) > mydat[is.na(mydat)]<-"0" > mydat > > Jim > > On Sun, Feb 25, 2018 at 11:27 AM, Val <valkremk at gmail.com> wrote: > > Thank you Jim, > > > > I read the data as you suggested but I could not find K1 in col1. > > > > rbind(preval,mydat) > > Col1 Col2 col3 > > 1 <NA> <NA> <NA> > > 2 X1 <NA> <NA> > > 3...

...AsFactors=FALSE) val23<-unique(unlist(mydat[,c("Col2","col3")])) napos<-which(is.na(val23)) preval<-data.frame(Col1=val23[-napos], Col2=NA,col3=NA) mydat<-rbind(preval,mydat) mydat[is.na(mydat)]<-"0" mydat Jim On Sun, Feb 25, 2018 at 11:27 AM, Val <valkremk at gmail.com> wrote: > Thank you Jim, > > I read the data as you suggested but I could not find K1 in col1. > > rbind(preval,mydat) > Col1 Col2 col3 > 1 <NA> <NA> <NA> > 2 X1 <NA> <NA> > 3 Y1 <NA> <NA> > 4 K2 <N...

...ike "failure to launch". At what point will you start showing your (failed) attempts at solving your own problems so we can help you work on your specific weaknesses and become self-sufficient? -- Sent from my phone. Please excuse my brevity. On February 25, 2018 7:55:55 AM PST, Val <valkremk at gmail.com> wrote: >HI Jim and all, > >I want to put one more condition. Include col2 and col3 if they are >not >in col1. > >Here is the data >mydat <- read.table(textConnection("Col1 Col2 col3 >K2 X1 NA >Z1 K1 K2 >Z2 NA NA >Z3 X1 NA >Z4 Y1 W1&q...

...; <NA> 3 Y1 <NA> <NA> 4 K2 <NA> <NA> 5 W1 <NA> <NA> 6 Z1 K1 K2 7 Z2 <NA> <NA> 8 Z3 X1 <NA> 9 Z4 Y1 W1 I could not find K1 in the first col1. Is that possible to fix this? On Sat, Feb 24, 2018 at 5:59 PM, Val <valkremk at gmail.com> wrote: > Thank you Jim and all, I got it. > > I have one more question on the original question > > What does this "[-1] " do? > preval<-data.frame(Col1=unique(unlist(mydat[,c("Col2","col3")]))[-1], > Co...

...Z1 K1 K2 Z2 NA NA Z3 X1 NA Z4 Y1 W1"),header = TRUE,stringsAsFactors=FALSE) preval<-data.frame(Col1=unique(unlist(mydat[,c("Col2","col3")]))[-1], Col2=NA,col3=NA) rbind(preval,mydat) mydat[is.na(mydat)]<-"0" Jiim On Sun, Feb 25, 2018 at 11:05 AM, Val <valkremk at gmail.com> wrote: > Sorry , I hit the send key accidentally here is my complete message. > > Thank you Jim and all, I got it. > > I have one more question on the original question > > What does this "[-1] " do? > preval<-data.frame(Col1=unique(unlist...

...general, is it? I'd think that should be x[!is.na(x1)] <- 0 x2 <- x1 Of course, in this example, x1 is 0, so it gives the same answer. Duncan Murdoch > > > Bill Dunlap > TIBCO Software > wdunlap tibco.com > > On Sat, Feb 24, 2018 at 9:59 AM, Val <valkremk at gmail.com> wrote: > >> Thank you Jim >> >> I wanted a final data frame after replacing the NA's to "0" >> >> x1 = rbind(unique(preval),mydat) >> x2 <- x1[is.na(x1)] <- 0 >> x2 >> but I got this, >> >> [1]...

...7 AM, Jim Lemon <drjimlemon at gmail.com> wrote: > Hi Val, > Try this: > > preval<-data.frame(Col1=unique(unlist(mydat[,c("Col2","col3")]))[-1], > Col2=NA,col3=NA) > rbind(preval,mydat) > > Jim > > On Sat, Feb 24, 2018 at 3:34 PM, Val <valkremk at gmail.com> wrote: > > Hi All, > > > > I am reading a file as follow, > > > > mydat <- read.table(textConnection("Col1 Col2 col3 > > Z2 NA NA > > Z3 X1 NA > > Z4 Y1 W1"),header = TRUE) > > > > 1. "NA" are miss...

...You asked why x2 was zero. The value of the expression f(a) <- b and assignments are processed right to left so x2 <- x[!is.na(x1)] <- 0 is equivalent to x[!is.na(x1)] <- 0 x2 <- 0 Bill Dunlap TIBCO Software wdunlap tibco.com On Sat, Feb 24, 2018 at 9:59 AM, Val <valkremk at gmail.com> wrote: > Thank you Jim > > I wanted a final data frame after replacing the NA's to "0" > > x1 = rbind(unique(preval),mydat) > x2 <- x1[is.na(x1)] <- 0 > x2 > but I got this, > > [1] 0 > > why I am getting this? > > &...

...x[!is.na(x1)] <- 0 > x2 <- x1 > > Of course, in this example, x1 is 0, so it gives the same answer. > > Duncan Murdoch > > > >> >> Bill Dunlap >> TIBCO Software >> wdunlap tibco.com >> >> On Sat, Feb 24, 2018 at 9:59 AM, Val <valkremk at gmail.com> wrote: >> >> Thank you Jim >>> >>> I wanted a final data frame after replacing the NA's to "0" >>> >>> x1 = rbind(unique(preval),mydat) >>> x2 <- x1[is.na(x1)] <- 0 >>> x2 >>> but I g...

Hi All, I generated 5000 samples using the following script test<- rnorm(5000,1000,100) test1 <- subset(test, subset=(test > 1100)) d <- density(test) plot(d, main="Density of production") abline(v=mean(test1) I wanted to do the following but faced difficulties 1. to shade or color (blue) the curve using the criterion that any

Hi all I am trying t extract a variable from a column ASk/20005-01-45/90 Alldatk/25-17-4567/990 I want to assign a variable to the numbers coming the first"-" x=01 for the first and x=17 for teh second I tried using gsub but did not work x=gsub("-") any help? [[alternative HTML version deleted]]

...Cheers, > Bert > > Bert Gunter > > "The trouble with having an open mind is that people keep coming along and > sticking things into it." > -- Opus (aka Berkeley Breathed in his "Bloom County" comic strip ) > > On Thu, May 17, 2018 at 5:48 PM, Val <valkremk at gmail.com> wrote: > >> Hi All, >> >> I have a sample of data set show as below. >> tdat <- read.table(textConnection("stat year Y >> AL 2003 25 >> AL 2003 13 >> AL 2004 21 >> AL 2006 20 >> AL 2007 12 >> AL...

? Fri, 22 Mar 2024 14:02:09 -0500 Val <valkremk at gmail.com> ?????: > X2.R > load("X1.RData") > > I am getting this error message: > Error in load("X1.RData", : > bad restore file magic number (file may be corrupted) .. no data > loaded. This error happens very early when R tries to load the fil...

Yes, X1.RData is large(more than 40M rows) . How do I get the first few bytes? On Fri, Mar 22, 2024 at 2:20?PM Ivan Krylov <ikrylov at disroot.org> wrote: > > ? Fri, 22 Mar 2024 14:02:09 -0500 > Val <valkremk at gmail.com> ?????: > > > X2.R > > load("X1.RData") > > > > I am getting this error message: > > Error in load("X1.RData", : > > bad restore file magic number (file may be corrupted) .. no data > > loaded. > > This error...

? Fri, 22 Mar 2024 14:31:17 -0500 Val <valkremk at gmail.com> ?????: > How do I get the first few bytes? What does file.info('X1.RData') say? Do you get any output if you run print(readBin('X1.RData', raw(), 128))? If this is happening on a Linux or macOS machine, the operating system command xxd -l 128 X1.RData will...

...e3 .+....3n^N...t{. 00000060: 5a5a 3405 fe35 8a3d ad80 0dc0 ca3e ea7a ZZ4..5.=.....>.z 00000070: e628 b220 ee50 0b9f 3a81 e971 8a19 4f54 .(. .P..:..q..OT On Fri, Mar 22, 2024 at 2:36?PM Ivan Krylov <ikrylov at disroot.org> wrote: > > ? Fri, 22 Mar 2024 14:31:17 -0500 > Val <valkremk at gmail.com> ?????: > > > How do I get the first few bytes? > > What does file.info('X1.RData') say? > > Do you get any output if you run print(readBin('X1.RData', raw(), 128))? > > If this is happening on a Linux or macOS machine, the operating syst...

Hi all, Assume I have a matrix xv= [1 0 0 0 0 12, 0 1 0 0 0 10, * 0 0 1 0 0 -9,* 0 0 0 1 0 20, * 0 0 0 0 1 -5]* if the last column of "xv" less than 0 then I want to set zero the entire row. The desired output looks like the following. In this case row 3 and row 5 are set zero. [ 1 0 0 0 0 12, 0 1 0 0 0 10, * 0 0 0 0 0 0,* 0 0 0 1 0 20,

According to the docs: getSheets() returns a list of java object references each pointing to an worksheet. ...and the Examples section of the help page shows you how to work with that. Can't tell whether the methods cover what you need though. B. On Apr 17, 2016, at 5:36 PM, Val <valkremk at gmail.com> wrote: > Thank you very much Boris. > Worked fine. My aim is to read the last sheet and the sheet preceding to it > > What I did is > L = length(getSheets(loadWorkbook("las.xlsx")) > > K1 =read.xlsx("las.xlsx", sheetIndex = L) > K2 =r...

Hi Val, Try this: preval<-data.frame(Col1=unique(unlist(mydat[,c("Col2","col3")]))[-1], Col2=NA,col3=NA) rbind(preval,mydat) Jim On Sat, Feb 24, 2018 at 3:34 PM, Val <valkremk at gmail.com> wrote: > Hi All, > > I am reading a file as follow, > > mydat <- read.table(textConnection("Col1 Col2 col3 > Z2 NA NA > Z3 X1 NA > Z4 Y1 W1"),header = TRUE) > > 1. "NA" are missing should be replace by 0 > 2. value that ar...