Weights of evidence caluclation for spatial data following Bonham-Carter, 1994.
predictTPts<- readOGR(dsn="your_dir", layer="training_points_sample")
evidenceRasterName= paste0("your_dir","/", "classified_raster.tif");
isCumulative = TRUE
evidenceRaster = readGDAL(evidenceRasterName)
weightedEvidenceRaster= calcWeights(evidenceRaster,predictTPts,isCumulative)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.