Error in complete.cases(x.neg, x.pos, y.neg, y.pos) : object 'x.neg' not found

[VincentYang147]

    > When I use this model, I recieved this:

Running correlations among explanatory variables... Error in complete.cases(x.neg, x.pos, y.neg, y.pos) : object 'x.neg' not found

Traceback: 23: complete.cases(x.neg, x.pos, y.neg, y.pos) 22: eval(substitute(expr), data, enclos = parent.frame()) 21: eval(substitute(expr), data, enclos = parent.frame()) 20: with.default(out, { good <- complete.cases(x.neg, x.pos, y.neg, y.pos) envelope(x.neg[good], x.pos[good], y.neg[good], y.pos[good], col = col.spread, alpha = alpha, border = border) }) 19: with(out, { good <- complete.cases(x.neg, x.pos, y.neg, y.pos) envelope(x.neg[good], x.pos[good], y.neg[good], y.pos[good], col = col.spread, alpha = alpha, border = border) }) 18: smoother(x[subs], y[subs], col = smoother.args$col[i], log.x = FALSE, log.y = FALSE, spread = spread, smoother.args = smoother.args) 17: lower.panel(...) 16: localLowerPanel(as.vector(x[, j]), as.vector(x[, i]), ...) 15: pairs.default(x, labels = var.labels, cex.axis = cex.axis, cex.main = cex.main, cex.labels = cex.labels, cex = cex, diag.panel = diag, row1attop = row1attop, panel = function(x, y, ...) { for (i in 1:n.groups) { subs <- groups == levels(groups)[i] if (plot.points) points(x[subs], y[subs], pch = pch[i], col = col[if (n.groups == 1) 1 else i], cex = cex) if (by.groups) { if (is.function(smoother)) smoother(x[subs], y[subs], col = smoother.args$col[i], log.x = FALSE, log.y = FALSE, spread = spread, smoother.args = smoother.args) if (is.function(reg.line)) regLine(reg.line(y[subs] ~ x[subs]), lty = lty, lwd = lwd, col = regLine.args$col[i]) if (ellipse) dataEllipse(x[subs], y[subs], plot.points = FALSE, ... 14: pairs(x, labels = var.labels, cex.axis = cex.axis, cex.main = cex.main, cex.labels = cex.labels, cex = cex, diag.panel = diag, row1attop = row1attop, panel = function(x, y, ...) { for (i in 1:n.groups) { subs <- groups == levels(groups)[i] if (plot.points) points(x[subs], y[subs], pch = pch[i], col = col[if (n.groups == 1) 1 else i], cex = cex) if (by.groups) { if (is.function(smoother)) smoother(x[subs], y[subs], col = smoother.args$col[i], log.x = FALSE, log.y = FALSE, spread = spread, smoother.args = smoother.args) if (is.function(reg.line)) regLine(reg.line(y[subs] ~ x[subs]), lty = lty, lwd = lwd, col = regLine.args$col[i]) if (ellipse) dataEllipse(x[subs], y[subs], plot.points = FALSE, ... 13: scatterplotMatrix.default(sdf, diagonal = "boxplot", reg.line = FALSE, use = "pairwise.complete.obs", spread = FALSE, smooth = TRUE) 12: scatterplotMatrix(sdf, diagonal = "boxplot", reg.line = FALSE, use = "pairwise.complete.obs", spread = FALSE, smooth = TRUE) 11: correlationMatrix(file.output.list, SelParmValues, subdata) 10: startModelRun(file.output.list, if_estimate, if_estimate_simulation, if_boot_estimate, if_boot_predict, enable_ShinyApp, filter_data1_conditions, data1, if_userModifyData, data_names, class.input.list, min.sites.list, if_validate, iseed, pvalidate, mapping.input.list, estimate.input.list, if_predict, biters, scenario.input.list, compare_models, modelComparison_name, if_spatialAutoCorr, add_vars, batch_mode, RSPARROW_errorOption) 9: executeRSPARROW(settingValues = lapply(settingsEnv, get), settingNames = settingsEnv, activeFile, envir = .GlobalEnv) 8: eval(ei, envir) 7: eval(ei, envir) 6: withVisible(eval(ei, envir)) 5: source(paste(path_master, "/R/runRsparrow.R", sep = "")) 4: eval(ei, envir) 3: eval(ei, envir) 2: withVisible(eval(ei, envir)) 1: source("E:/Coding/R/RSPARROW_UserTutorial/results/sparrow_control.R")

[ShuaiGe57]

Use the data in Model1 ~ 8 instead of the default data in results

[KlausWu]

Do you mean the data in excle? Such as using Model1_dataDictionary to replace the dataDictionary

Use the data in Model1 ~ 8 instead of the default data in results

[ShuaiGe57]

Do you mean the data in excle? Such as using Model1_dataDictionary to replace the dataDictionary

Use the data in Model1 ~ 8 instead of the default data in results

yes,include the control file

[KlausWu]

Do you mean the data in excle? Such as using Model1_dataDictionary to replace the dataDictionary

Use the data in Model1 ~ 8 instead of the default data in results

yes,include the control file Thank you very much! It worked!

[zingzxyang]

Do you mean the data in excle? Such as using Model1_dataDictionary to replace the dataDictionary

Use the data in Model1 ~ 8 instead of the default data in results

yes,include the control file Thank you very much! It worked!

hello, please tell me more details about how to use Model1_dataDictionary to replace the dataDictionary, thank you very much!!!

[KlausWu]

Just copy and pasete all the file in Model1 file.

[zingzxyang]

Just copy and pasete all the file in Model1 file.

ok, thank you so much! I have successfully solved this problem and ran the model.

[KlausWu]

Do you mean the data in excle? Such as using Model1_dataDictionary to replace the dataDictionary

Use the data in Model1 ~ 8 instead of the default data in results

yes,include the control file

When I use my own data, I recieved this: Error in calcDemtareaClass(sitedata$demtarea) (from calcDemtareaClass.R#30) : object 'demtarea.class' not found

Traceback: 11: calcDemtareaClass(sitedata$demtarea) 10: startModelRun(file.output.list, if_estimate, if_estimate_simulation, if_boot_estimate, if_boot_predict, enable_ShinyApp, filter_data1_conditions, data1, if_userModifyData, data_names, class.input.list, min.sites.list, if_validate, iseed, pvalidate, mapping.input.list, estimate.input.list, if_predict, biters, scenario.input.list, compare_models, modelComparison_name, if_spatialAutoCorr, add_vars, batch_mode, RSPARROW_errorOption) 9: executeRSPARROW(settingValues = lapply(settingsEnv, get), settingNames = settingsEnv, activeFile, envir = .GlobalEnv) 8: eval(ei, envir) 7: eval(ei, envir) 6: withVisible(eval(ei, envir)) 5: source(paste(path_master, "/R/runRsparrow.R", sep = "")) 4: eval(ei, envir) 3: eval(ei, envir) 2: withVisible(eval(ei, envir)) 1: source("E:/SPARROWyax/rsparrow-master/UserTutorial/results/sparrow_control.R")

RSPARROW SYSTEM ERROR OCCURRED To reset user options in R use options(backupOptions)

Can you give me some advice ,thanks!

[ShuaiGe57]

does your data.csv file has demtarea column?

[KlausWu]

does your data.csv file has demtarea column?

Yes！And each subwatershed has a corresponding value. QAQ