Update ishigami.R

Author: yannrichet

src/main/samples/ishigami.R

@@ -5,4 +5,4 @@ ishigami <- function (x)
     sin(x[, 1]) + A * sin(x[, 2])^2 + B * x[, 3]^4 * sin(x[,1])
 }
 
-cat(' ',ishigami(cbind(?a , ?b , ?c )),"\n")
+cat('i=',ishigami(cbind(?a , ?b , ?c )),"\n")