library("leukemiasEset")
data("leukemiasEset")
summary(leukemiasEset$LeukemiaType)
ALL AML CLL CML NoL 
 12  12  12  12  12 
data(geneSymbols)
trainSamples <- c(1:10, 13:22, 25:34, 37:46, 49:58)
summary(leukemiasEset$LeukemiaType[trainSamples])
ALL AML CLL CML NoL 
 10  10  10  10  10 
leukemiasClassifier <- geNetClassifier(eset=leukemiasEset[,trainSamples],sampleLabels="LeukemiaType", plotsName="leukemiasClassifier",skipInteractions=TRUE, maxGenesTrain=20, geneLabels=geneSymbols)
10:23:53 - Filtering data and calculating the genes ranking...
10:24:28 - Calculating correlations between genes...
Network calculated without interactions
Gene associations (network) calculated between genes with posterior probability over 0.95
10:24:28 - All required parameters have been calculated and checked. Building classifier...
10:24:45 - Classifier trained with 50 samples.
Total number of genes included in the classifier: 32
Number of genes per class: 
 	ALL: 8 genes
 	AML: 5 genes
 	CLL: 4 genes
 	CML: 3 genes
 	NoL: 12 genes
No associations/redundancy was removed between these genes

Attaching package: ‘igraph’

The following objects are masked from ‘package:BiocGenerics’:

    normalize, union

The following objects are masked from ‘package:stats’:

    decompose, spectrum

The following object is masked from ‘package:base’:

    union

Error in layout_with_fr(list(100, FALSE, c(1, 2, 2, 3, 3, 3, 4, 4, 4,  : 
  unused argument (niterNumeric = 500)