A = matrix(c("a","b","c","d","e","u","v",rep("x",3)),5,2,byrow=F)
unique(A[, 2])
"A big computer, a complex algorithm and a long time does not equal science." -- Robert Gentleman
Visualizzazione post con etichetta vector. Mostra tutti i post
Visualizzazione post con etichetta vector. Mostra tutti i post
lunedì 21 maggio 2007
Conversion of column matrix into a vector without duplicate
martedì 15 maggio 2007
Large Matrix into a vector
mx <- matrix(rnorm(100,1:100),10,10) vec <- c(mx)or
vec <- c(as.matrix(mx))or
dim(mx) <- NULL
martedì 8 maggio 2007
Fill a matrix with vectors of different lengths
v <- c(1,1,2,3,4,6)
binc <- function(x){
l <- sum(x)+1
y <- c(1,rep(0,l-1))
for (i in x) y <- y+c(rep(0,i),y)[1:l]
}
out <- lapply(1:length(v), function(i) binc(v[1:i]))
nout <- max(sapply(out, length))
sapply(out, function(x) c(x, rep(0, nout - length(x))))
Iscriviti a:
Post (Atom)