I have written a function that goes through a database and calculates various metric scores and allocates them to a data set. For 400 of the 500 sites that I calculate these metrics for works fine and allocates the scores into the appropriate column. For some reason, some sites I run into the below problem:
Here is what I am doing: > names(orig.metric) [1] "BenInsect" "CountofTaxa" "Darter" [4] "DomTwoPct" "FishDELTPct" "Minnows-Tolerant" [7] "NumberPer100m-Tolerant" "Sensitive" "SLithopPct" [10] "TolerantPct" "Omnivore" "PiscivorePct" [13] "Headwater-Tolerant" "Insect-Tolerant" "Wetland-Tolerant" [16] "Piscivore" "DarterSculpNot" "OmnivorePct" [19] "SlithopPct" For this given site the metrics that are calculated are XXX.table$Metric.name [1] "CountofTaxa" "DarterSculpNot" "FishDELTPct" [4] "Insect-Tolerant" "NumberPer100m-Tolerant" "PiscivoreNumber" [7] "Sensitive" "SLithopPct" "TolerantPct" [10] "Wetland-Tolerant" I then try to use 'which' to determine the appropriate columns to allocate each metric into no<- which(names(orig.metric)==XXX.table$Metric.name) and this gives me > no [1] 14 So when I use orig.metric.scores[no]<- IBI.table.0$IBI.score I get this error: Error in `[<-.data.frame`(`*tmp*`, no, value = c(2, 5, 10, 2, 10, 0, 0, : replacement has 10 rows, data has 1 I know why the error is being generated but I do not know why it will not properly identify which columns to allocate the metrics into. I have tried many things, including setting options(stringsAsFactors = FALSE) in my Rprofile.site. Where am I going wrong here? Any suggestions or work arounds would help me greatly. -- View this message in context: http://www.nabble.com/problem-with-%27which%27-and-strings-tp21955970p21955970.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
