Fusion {GeoFIS} | R Documentation |
The main class to perform data fusion
More information is available in the vignette "Data Fusion with GeoFIS"
aggregate
data.tree::Node object, or a list of data.tree::Node, The node(s) to aggregate
new()
The constructor to build an object of class Fusion.
Fusion$new(source)
source
data.frame or sp::Spatial*DataFrame object of sp::sp package
Keep only numeric attributes
perform()
Perform the data fusion
Fusion$perform()
output()
Get the output aggregated data (same object type as data source)
Fusion$output()
data.frame or sp::Spatial*DataFrame object
Guillaume S, Bates T, Lablee J, Betts T, Taylor J (2020). “Combining Spatial Data Layers Using Fuzzy Inference Systems: Application to an Agronomic Case Study.” In Proceedings of the 6th International Conference on Geographical Information Systems Theory, Applications and Management (GISTAM 2020), 62-71. ISBN 978-989-758-425-1.
Mora-Herrera DY, Guillaume S, Snoeck D, Zuniga Escobar O (2020). “A fuzzy logic based soil chemical quality index for cacao.” Computers and Electronics in Agriculture, 177, 105624. doi:10.1016/j.compag.2020.105624.
# more information about this example in the vignette "Data Fusion with GeoFIS"
# section "Learning illustration"
library(GeoFIS)
data(fusion_cars)
fusion <- NewFusion(fusion_cars)
a <- NewFusionInput("a", NewMfTrapezoidalInf(4, 20), "A")
v <- NewFusionInput("v", NewMfTrapezoidalSup(100, 500), "V")
s <- NewFusionInput("s", NewMfTrapezoidalSup(120, 220), "S")
c <- NewFusionInput("c", NewMfTrapezoidalInf(6, 16), "C")
owa_aggreg <- NewFusionAggreg("score", NewAggregOwa(c(1, 0, 0, 0)), a, v, s, c)
fusion$aggregate <- owa_aggreg
fusion$perform()
score <- fusion$output()["score"]
print(score)