Displaying 1 result from an estimated 1 matches for "csv_basef".
Did you mean:
csv_base
2010 Jan 20
0
putting labels back on a matrix.
...D back to the results matrix but I can't seem to find a way to join the ID back. Below is the exact input I'm using, row 9 is where I strip the Site_ID value from the input data.
library(vegan)
library(reshape)
csv_base <- read.csv("c:/temp/cvs_export.csv", header=T, as.is=T)
csv_basef <- subset(csv_base, Site_Id >= 1)
testm <- melt(csv_basef, id = 1:4, measure = 5)
test <- cast(testm, Site_Id ~ Element_Id, sum)
dim(test)
names(test)
csv.data <- test[,c(-1)]
csv.m <- as.matrix(csv.data,)
dimnames(csv.m) <- list(test$site_id, names(csv.data))
csv.dis <- veg...