On 20/04/11 22:25, vioravis wrote:
This should work!!
rmse<-function (x){
dquared<-x^2
sum1<-sum(x^2,na.rm=TRUE)
rmse<-sqrt((1/length(x))*sum1)
rmse}
Shouldn't the divisor be the number of non-missing values in x?
Rather than the length of x? (Like, e.g. sum(!is.na(x)) ?)
cheers,
Am 20.04.2011 10:59, schrieb Mauro:
It`s probably an easy question, but couldn`t figure it out.
I`ve defined a function like:
rmse<-function (x){
dquared<-x^2
sum1<-sum(x^2)
rmse<-sqrt((1/length(x))*sum1)
rmse}
My problem is, that I have NA Values in x and the above function returns NA.
I`m l
This should work!!
rmse<-function (x){
dquared<-x^2
sum1<-sum(x^2,na.rm=TRUE)
rmse<-sqrt((1/length(x))*sum1)
rmse}
--
View this message in context:
http://r.789695.n4.nabble.com/Integrate-na-rm-in-own-defined-functions-tp3462492p3462615.html
Sent from the R help mailing list archive at Nab
It`s probably an easy question, but couldn`t figure it out.
I`ve defined a function like:
rmse<-function (x){
dquared<-x^2
sum1<-sum(x^2)
rmse<-sqrt((1/length(x))*sum1)
rmse}
My problem is, that I have NA Values in x and the above function returns NA.
I`m looking for a way to use "na.rm=TRUE"
4 matches
Mail list logo