Print summary information from FormatOccurrence object.

Display the type and number of training and evaluation dataset in the formatted observations obtained by function format_observation.

Usage

# S3 method for class 'FormatOccurrence'
print(x, ...)

Arguments

x

(FormatOccurrence) A FormatOccurrence object to be messaged. It could be the return of function format_observation.

...

Not used.

Value

The same object that was passed as input.

See also

format_observation

Examples

# \donttest{
library(dplyr)
library(itsdm)
data("occ_virtual_species")

# obs + eval, presence-absence
obs_df <- occ_virtual_species %>% filter(usage == "train")
eval_df <- occ_virtual_species %>% filter(usage == "eval")
x_col <- "x"
y_col <- "y"
obs_col <- "observation"
obs_type <- "presence_absence"

obs_formatted <- format_observation(
  obs_df = obs_df, eval_df = eval_df,
  x_col = x_col, y_col = y_col, obs_col = obs_col,
  obs_type = obs_type)

print(obs_formatted)
# }