Generate the SQUAD Simulation matrix display.

Description

This method is used to create a simulation matrix. Each columns correspond to the user-selected component node and the each rows, to the conditions.

Usage

plotSimMatrix(object)

Arguments

Author(s)

Martial Sankar

See Also

More specific information in plotSimMatrix-methods. For more informations about the input object see SquadSimResServiceImpl-class.

Examples

fpath <- system.file("extdata", package="SQUADD")
fileModel <- file.path(fpath,"data_IAA")
nm <- c("ARF(a)", "ARF(i)", "AR_Genes", "Aux/IAA", "BES1/BZR1",
 "BIN2", "BR", "BRI1-BAK1","BRR_Genes","BRX","BR_Biosynthesis","BZR1",
  "DO", "IAA", "IAA_Biosynthesis", "NGA1", "PIN", "SCFTir1","StimAux", "StimBR")
t <- 50

## call constructor
obj <- simResService(
		folder=fileModel,
		time=t,
		ncolor=5,
		legend=nm,
		indexDeno=1,
		method="lowess",
		selectNode=c("DO","IAA_Biosynthesis","BR_Biosynthesis", "IAA", "BR"))

## call method
plotSimMatrix(obj)		
		
		
		

Results

R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(SQUADD)
> png(filename="/home/ddbj/snapshot/RGM3/R_BC/result/SQUADD/plotSimMatrix.Rd_%03d_medium.png", width=480, height=480)
> ### Name: plotSimMatrix
> ### Title: Generate the SQUAD Simulation matrix display.
> ### Aliases: plotSimMatrix
> ### Keywords: simulation
> 
> ### ** Examples
> 
> fpath <- system.file("extdata", package="SQUADD")
> fileModel <- file.path(fpath,"data_IAA")
> nm <- c("ARF(a)", "ARF(i)", "AR_Genes", "Aux/IAA", "BES1/BZR1",
+  "BIN2", "BR", "BRI1-BAK1","BRR_Genes","BRX","BR_Biosynthesis","BZR1",
+   "DO", "IAA", "IAA_Biosynthesis", "NGA1", "PIN", "SCFTir1","StimAux", "StimBR")
> t <- 50
> 
> ## call constructor
> obj <- simResService(
+ 		folder=fileModel,
+ 		time=t,
+ 		ncolor=5,
+ 		legend=nm,
+ 		indexDeno=1,
+ 		method="lowess",
+ 		selectNode=c("DO","IAA_Biosynthesis","BR_Biosynthesis", "IAA", "BR"))
> 
> ## call method
> plotSimMatrix(obj)		
/home/ddbj/local/lib64/R/library/SQUADD/extdata/data_IAA/brx_1_normal.txt 
/home/ddbj/local/lib64/R/library/SQUADD/extdata/data_IAA/brx_2_brxlof.txt 
/home/ddbj/local/lib64/R/library/SQUADD/extdata/data_IAA/brx_3_brrescue.txt 
/home/ddbj/local/lib64/R/library/SQUADD/extdata/data_IAA/brx_4_brxarfi.txt 
/home/ddbj/local/lib64/R/library/SQUADD/extdata/data_IAA/brx_5_brxarfiRescue.txt 
/home/ddbj/local/lib64/R/library/SQUADD/extdata/data_IAA/brx_6_gain.txt 
> 		
> 		
> 		
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>