Commit c3c38112 authored by kunstler's avatar kunstler
Browse files

fixe error in file name 2

parent 16e8cf4d
......@@ -340,7 +340,7 @@ return(as.vector(scale(x, ...)))
scale.nc <- function(x, center = FALSE){
return(as.vector(scale(x,
center = center,
scale = apply(x,2, sd, na.rm = TRUE))))
scale = sd(x, na.rm = TRUE))))
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment