search for: variableprob

Here is my R Code x<-1:20000 y<-2:141 data.matrix<-data.matrix(data[,y])#create data.matrix variableprobe<-apply(data.matrix[x,],1,var) variableprobe #output variance across probesets hist(variableprobe) #displaying histogram of variableprobe write.table(cbind(data[1], Variance=apply(data[,y],1,var)),file='c://variance.csv') #export as a .csv file. Output in Excel all in 1 column. Probe...

...data: short sample ProbeID Sample_1_D Sample_1_C Sample_2_D Sample_2_C 1 224588_at 2.425509867 11.34031409 11.46868531 11.75741478 step 2: i calculate the variance of the sample using this R code x<-1:20000 y<-2:141 data.matrix<-data.matrix(data[,y])#create data.matrix variableprobe<-apply(data.matrix[x,],1,var) step 3: however, when i type in variableprobe, it gives me this. 1 21.58257457 step 4: I need the code to output this: ProbeID Variance 1 224588_at 21.58257457 What do i need to do to modify the code to give me better description like the one above?...

***********reading in data********** data<-read.table("microarray.txt",header=T, sep="\t") head(data) dim(data) attach(data) ***********creating matrix and calculating variance across probesets******** x<-1:20000 y<-2:141 data.matrix<-data.matrix(data[,y]) variableprobe<-apply(data.matrix[x,],1,var) hist(variableprobe) **************filter out low variance************* data.sub = data.matrix[order(variableprobe,decreasing=TRUE),][1:10000,] dim(data.sub) [1] 10000 140 What is the best way to calculate the distances between the samples using the euclidean...

...y 10000. The 10000 is fine but when i export to excel, it is missing the probeID. Here are my code and examples. #########calculate the variance across the probesets and plot signals######### library(xlsReadWrite) x<-1:20000 y<-2:141 data.matrix<-data.matrix(data[,y])#create data.matrix variableprobe<-apply(data.matrix[x,],1,var) variableprobe #output variance across probesets hist(variableprobe) #displaying histogram of variableprobe write.xls(cbind(data[1], Variance=apply(data[,y],1,var)),file='c://variance.csv') #export as a .csv file. Output: ProbeID Variance 22...

Hi Everyone, I need some simple help. Here are my codes ##########will give me 10000 probesets#################### data.sub = data.matrix[order(variableprobe,decreasing=TRUE),][1:10000,] dim(data.sub) data_output<-write.table(data.sub, file = "c://data_output.csv", sep = ",", col.names = NA) When i export to excel, it shows me this. This is just a short version. There are 1000 rows and 140 columns Sample_1_D Sample_1_C Sample...