X <- matrix(rnorm(200),nrow=20,ncol=10)
rownames(X) <- c('34916_s_at','34917_at','34462_at','163_at','35219_at',
'31641_s_at','33300_at','33301_g_at','38950_r_at','41249_at',
'294_s_at','32004_s_at','33299_at','41243_at','33341_at','362_at',
'1918_at','41499_at','41500_at','41282_s_at')
colnames(X) <- paste("Sample",1:10,sep="")
y <- rep(c("A","B"),c(5,5))
toy <- buildMACAT(X,"hgu95av2.db",y)
summary(toy)
Run the code above in your browser using DataLab