## Not run:
# data(spectral_data)
#
# ## Set response variable (Chlorophyll content)
# spectral_data <- setResponse(spectral_data, "chlorophyll")
#
# ## Set additional predictor variables from the attributes
# spectral_data <- setPredictor(spectral_data, "season")
#
# ## Feature selection using genetic algorithms
# ## Note that this may take some time!
# gafs_res <- gafs(spectral_data)
#
# get_gafs(gafs_res)
# ## End(Not run)
Run the code above in your browser using DataLab