hugo_show_statistics: Gives the brief overview of the present hugo statistics.
In hugo4r/hugo: I'm your personal assistant!

Description Usage Value Author(s) Examples

hugo_show_statistics() is a generic function used to produce summaries of hugo investigation.

1	hugo_show_statistics()

Function returns a list containing following components:

`creationDate`	beginning of current research,
`objects`	number of saved objects,
`dataSets`	number of loaded data sets,
`plots`	number of saved plots,
`tables`	number of saved tables,
`models`	number of saved models,
`trainedModels`	number of trained models,
`instructions`	number of instructions

Joanna Jablonska

## Not run: 

# firt start hugo investigation
hugo_start_investigation("example")
# use some functions from hugo package
model <- lm(Sepal.Length ~ Petal.Length, data = iris)
hugo_memorise_model(model)
hugo_show_history()
# call hugo_show_statistics() to see hugo summaries of current investigation
hugo_show_statistics()
unlink("example", recursive = TRUE)

## End(Not run)