[R-sig-eco] Fwd: problems regarding varpart function in r

[Rajendra Mohan panda]

Dear members

 The file I have attached previously was big which might have created
trouble, therefore I have made it short for you to go through quickly
without wasting your valuable time. Only repeated matters are removed to
avoid confusion.

Kindly advise

With best Regards
Rajendra M Panda
School of Water Resources,
Indian Institute of Technology Kharagpur
-------------- next part --------------
>  getwd()
[1] "C:/Documents and Settings/Rajendra/Desktop"
> SA<-read.csv("SASP.csv",header = TRUE,stringsAsFactors = FALSE)
> SAE<-read.csv("SAE.csv",header = TRUE,stringsAsFactors = FALSE)
  library(lattice)
>  library(vegan)
This is vegan 2.0-10
> SPHL<-decostand (SA, "hell", na.rm = TRUE)
> rda.vasc.0 <- rda (SPHL ~1, data = SAE, scale = FALSE, na.action = na.action.omit)
Error in svd(Xbar, nu = 0, nv = 0) : infinite or missing values in 'x'
> rda.vasc.0 <- rda (SPHL ~1, data = SAE, scale = TRUE, na.action = na.action.omit)
Error in svd(Xbar, nu = 0, nv = 0) : infinite or missing values in 'x'
> rda.vasc.0 <- rda (SPHL ~1, data = SAE, scale = TRUE, na.action = NULL)
Error in svd(Xbar, nu = 0, nv = 0) : infinite or missing values in 'x'
> rda.vasc.0 <- rda (SPHL ~1, data = SAE, scale = FALSE)
Error in svd(Xbar, nu = 0, nv = 0) : infinite or missing values in 'x'
> rda.vasc.0 <- rda (SPHL ~1, data = SAE)
Error in svd(Xbar, nu = 0, nv = 0) : infinite or missing values in 'x'
> SAE <- scale(SAE)
> SAE[is.nan(SAE)] <- 0 
> rda.vasc.All <- rda (SPHL ~., data = SAE, scale = TRUE, na.action = na.omit)
Error in formula.default(object, env = baseenv()) : invalid formula
> rda.vasc.All <- rda (SPHL ~., data = SAE, scale = FALSE, na.action = na.omit)
Error in formula.default(object, env = baseenv()) : invalid formula
> rda.vasc.All <- rda (SPHL ~ ., data = SAE, scale = FALSE, na.action = na.omit)
Error in formula.default(object, env = baseenv()) : invalid formula
> SAE<-read.csv("SAE.csv",header = TRUE,stringsAsFactors = FALSE)
> SAE[is.nan(SAE)] <- 0 
Error in is.nan(SAE) : default method not implemented for type 'list'
> rda.vasc.All <- rda (SPHL ~ ., SAE, scale = FALSE, na.action = na.omit)
Error in svd(Xbar, nu = 0, nv = 0) : infinite or missing values in 'x'
> rda.vasc.All <- rda (SPHL ~ ., SAE, scale = FALSE, na.rm = TRUE)
Error in model.frame.default(data = SAE, na.rm = TRUE, na.action = function (object,  : 
  variable lengths differ (found for '(na.rm)')
> vp1 <- varpart (SPHL, ~Pptn, ~ Temp, ~Moisture, data = SAE)
Error in qr.fitted(Q, Y) : NA/NaN/Inf in foreign function call (arg 5)
> vp1 <- varpart (SPHL, ~Pptn, ~ Temp, ~Moisture, data = SAE, na.action = na.omit)
Error in as.vector(x, mode) : 
  cannot coerce type 'closure' to vector of type 'any'
> vp1 <- varpart (SPHL, ~Pptn, ~ Temp, ~Moisture, data = SAE, scale = FALSE, na.action = na.omit)
Error in as.vector(x, mode) : 
  cannot coerce type 'closure' to vector of type 'any'
> vp1<-rda(SPHL ~Pptn, data = X, scale = TRUE, na.action = na.fail)
Error in model.frame(data = X, na.action = function (object, ...)  : 
  object 'X' not found
> vp1 <- varpart (SPHL, ~Pptn + ~ Temp + ~Moisture, data = SAE, scale = FALSE, na.action = na.omit)
Error in as.vector(x, mode) : 
  cannot coerce type 'closure' to vector of type 'any'
> vp1 <- varpart (SPHL, ~Pptn + ~ Temp + ~Moisture, data = SAE, scale = FALSE)
Error in varpart(SPHL, ~Pptn + ~Temp + ~Moisture, data = SAE, scale = FALSE) : 
  needs 2 to 4 explanatory tables
> vp1 <- varpart (SPHL, ~Pptn + ~ Temp + ~Moisture, data = SAE, scale = TRUE)
Error in varpart(SPHL, ~Pptn + ~Temp + ~Moisture, data = SAE, scale = TRUE) : 
  needs 2 to 4 explanatory tables