Commit 8fcbe775 authored by Antoine Lucas's avatar Antoine Lucas
Browse files

fix notes / warns

parent 5506ecb3
......@@ -5,6 +5,7 @@ Title: Another Multidimensional Analysis Package
Author: Antoine Lucas
Maintainer: Antoine Lucas <antoinelucas@gmail.com>
Depends: R (>= 2.10.0)
Suggests: Biobase
Description: Tools for Clustering and Principal Component Analysis
(With robusts methods, and parallelized functions).
License: GPL
......
......@@ -31,8 +31,10 @@ function(x, centers, iter.max = 10, nstart = 1,
stop("ambiguous distance method")
if(class(x) == "exprSet")
x <- exprs(x)
{
library(Biobase)
x <- exprs(x)
}
x <- as.matrix(x)
m <- nrow(x)
......
......@@ -2,8 +2,10 @@ Dist <- function(x, method="euclidean", nbproc = 2, diag=FALSE, upper=FALSE)
{
if(class(x) == "exprSet")
{
library(Biobase)
x <- exprs(x)
}
## account for possible spellings of euclidean
if(!is.na(pmatch(method, "euclidian")))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment