This function computes the EAF given a set of points and a vector
that indicates to which set each point belongs.
Either a matrix or a data frame of numerical values, where each row gives the coordinates of a point.
A vector indicating which set each point belongs to.
Indicates that the EAF must be computed separately for data belonging to different groups.
The percentiles of the EAF of each side that will be
plotted as attainment surfaces.
A data frame (
data.frame) containing the exact representation
of EAF. The last column gives the percentile that corresponds to each
point. If groups is not
NULL, then an additional column
indicates to which group the point belongs.
There are several examples of data sets in
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
extdata_path <- system.file(package="eaf", "extdata") x <- read_datasets(file.path(extdata_path, "example1_dat")) # Compute full EAF str(eafs(x[,1:2], x[,3])) # Compute only best, median and worst str(eafs(x[,1:2], x[,3], percentiles = c(0, 50, 100))) x <- read_datasets(file.path(extdata_path, "spherical-250-10-3d.txt")) y <- read_datasets(file.path(extdata_path, "uniform-250-10-3d.txt")) x <- data.frame(x, groups = "spherical") x <- rbind(x, data.frame(y, groups = "uniform")) # Compute only median separately for each group z <- eafs(x[,1:3], sets = x[,4], groups = x[,5], percentiles = 50) str(z) # library(plotly) # plot_ly(z, x = ~X1, y = ~X2, z = ~X3, color = ~groups, # colors = c('#BF382A', '#0C4B8E')) %>% add_markers()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.