predict

Function to simulate a trained Artificial Hydrocarbon Network.

# S3 method for ahn
predict(object, ...)

Arguments

object	an object of class "ahn" produced from the fit function.
...	further arguments passed to or from other methods.

Value

predicted output values for inputs in newdata.

Examples

# NOT RUN {
# Create data
x <- 2 * runif(1000) - 1;
x <- sort(x)

y <- (x < 0.1) * (0.05 * runif(100) + atan(pi*x)) +
    (x >= 0.1 & x < 0.6) * (0.05 * runif(1000) + sin(pi*x)) +
    (x >= 0.6) * (0.05 * runif(1000) + cos(pi*x))

# Create Sigma list
Sigma <- list(X = data.frame(x = x), Y = data.frame(y = y))

# Train AHN
ahn <- fit(Sigma, 5, 0.01, 500)

# Test AHN
X <- data.frame(x = x)
ysim <- predict(ahn, X)
# }