search for: mg3199

...ion of my code. I have highlighted the dodgy code in red. Please help if possible. ###################################################### ########### Create matrix ########################### ###################################################### #Open the csv file OGSdata <- read.table("MG3199.csv",sep=",",header=TRUE) #creates 3 separate vectors sample <- OGSdata[,1] mci <- OGSdata[,2] pct <- OGSdata[,3] #change mci range offset <- min(mci)-1 mci <- (mci - offset) #matrix sizes mci_count <- max(mci) sample_count <- max(sample) #creates a zero mat...

...9;x' CODE ###################################################### ########### Create matrix ########################### ###################################################### # load packages require(reshape) source("rangescale.r") #Open the csv file OGSdata <- read.table("MG3199.csv",sep=",",header=TRUE) #create matrix x.m <- melt(OGSdata, measure.var="pct") OGS <- cast(x.m, mci ~ sample) ###################################################### ########### PCA #################################### ##########################################...